Составьте программу, по которой будет реализован
следующий сценарий:
1. компьютер запрашивает Ваше имя, ввести имя с
клавиатуры.
2. компьютер запрашивает Ваш год рождения, ввести
год рождения.
3. после ввода компьютер сообщает ваш возраст
(количество лет).
4. Для расчета от текущего года надо вычесть год
Вашего рождения.
Например, если ввели имя Иван, год рождения 2005, то
выведется фраза «Иван тебе 15 лет».
паскаль
PascalABC
Объяснение:
program vozrast;
var
name: string;
year, age: integer;
d: datetime;
begin
Write('Введите имя: ');
ReadLn(name);
Write('Введите год рождения: ');
ReadLn(year);
d := DateTime.Now;
age := d.Year - year;
WriteLn(name,', тебе ', age, ' лет.');
end.