с клавиатуры вводится возраст мужчины. определить сколько лет ему осталось до пенсии или вывести на экран слово пенсионер если он достиг пенсионного возраста
Program p2;
Var a:integer;
Begin
Readln(A);
If a< {введите вместо этого пенсионный возраст } then
Writeln(До пенсии осталось, {введите вместо этого пенсионный возраст }-a,’ лет.’) else
Writeln(‘Пенсионер’);
End.
Оцени ответ
