Помогите пожалуйста .В Pascal надобно сделать метод с разговором на 10

Ну если просто вопрос-ответ

var a: integer;

b: string;

begin

write('ваш возраст - ');

readln(a);

write('твоё самое любимое увлечение - ');

readln(b);

...

и так дальше спрашиваешь командой "write('вопрос')", а для ответа команда "readln(d)", где d - это переменная, перед тем как её написать туда, надобно её объявить после команды "var" через запятую. Если ответом будет текст, то писать перед "string", если естественное число, то перед "integer", если целое число, то перед "real"

(к примеру

var a, b, c: integer;

d, e, f: string;

g, h: real;)

...

end.