Question

Напишите пожалуйста программу в паскале с if
0-16 младенец
7-18 ребёнок
19-55 взрослый
56-100 пенсионер

Answer 1

var age:integer;

begin

  readln(age);

  if (age >= 0)and(age <=7) then writeln('Младенец');

  if (age > 7)and(age < 18) then writeln('Ребёнок');

  if (age >= 18)and(age <= 55) then writeln('Взрослый');

  if (age > 55) then writeln('Пенсионер');

end.

Answer 2

Ой, все съехало

Answer 3

Поправил