Опубликовано 12.06.2017 по предмету Информатика от Гость >> <<

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

Ответ оставил Гость

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.