Question

Создайте приложение «5 лет назад», которое через области ввода запрашивает у пользователя имя и возраст. А при нажатии на кнопку в заголовке формы выводит надпись с именем и возрастом, который был 5 лет назад. Например, ввели имя «Вася», а возраст «17» лет, то приложение должно выдать «Вася, 5 лет назад Вам было 12». Причем если было введено число меньше 5, то приложение выводит «Вы еще не родились».

Answer 1

Program past;
uses crt;
var name: string;
age: float;

begin
clrscr;
readln('Введите ваше имя'; name);
readln('Введите ваш возраст'; age);
writeln;
if age<5 then
writeln (name, ' 5 лет назад вы еще не родились');
else
writeln (name, ' 5 лет назад вам было ', age -5, ' лет');
endif;
readkey;
end.