Составьте программу на языке Паскаль, которая запрашивает у пользователя сколько ему лет. Если меньше 7, то пишет «Да ты ещё ребёнок», если больше 7 , но меньше 18, пишет « Ты настоящий мужчина». Если больше 18, то «Ты мужчина в самом расцвете сил».

Тим9775 Тим9775    3   10.04.2020 07:47    0

Ответы
alina13lina87 alina13lina87  13.10.2020 01:01

var age: integer;

begin

write('Сколько вам лет?');

read(age);

if (age < 7) then begin

writeln('Да ты ещё ребёнок');

end

if (age > 7) and (age < 18) then begin

writeln('Ты настоящий мужчина');

end

else begin

writeln('Ты мужчина в самом расцвете сил');

end;

end.

Объяснение:

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика