Составить программу по которой будет реализован следующий сценарий компьютер запрашивает ваш возраст и после ввода сообщает ваш год рождения

Question

Информатика

Ванюша

29 марта, 17:56

Составить программу по которой будет реализован следующий сценарий компьютер запрашивает ваш возраст и после ввода сообщает ваш год рождения

+2

Ответы (1)

Знаете ответ на вопрос?

Кара · Answer 1

Var

age, godr, year:integer;

begin

Write ('Укажите возраст: ') ; Read (age) ;

Write ('Укажите текущий год: ') ; Read (year) ;

godr:=year-age;

Writeln ('Ваш год рождения ', godr)

end.