Составить программу, которая в процессе беседы с пользователем, выясняет сколько ему лет

Question

Составить программу, которая в процессе беседы с пользователем, выясняет сколько ему лет

Answer 1

Var a:byte;
begin
writeln('Сколько тебе лет?');
write('Ответ: ');
readln(a);
writeln('Тебе ',a,'!');
end.