с клавиатуры вводится возраст мужчины. определить сколько лет ему осталось до пенсии или вывести на экран слово пенсионер если он достиг пенсионного возраста

Program p2;

Var a:integer;

Begin

Readln(A);

If a< {введите вместо этого пенсионный возраст } then

 Writeln(До пенсии осталось, {введите вместо этого пенсионный возраст }-a,’ лет.’) else

 Writeln(‘Пенсионер’);

End.

 

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку