Question

Помогите пожалуйста написать программу здоровья для 15-30 летнего человека на языке Паскаль(информатика 8 класс).
Спасибо

Answer 1

Если помогла чем то то только так

Answer 2

Могу только так помочь.

program Zadachka;

var

a:integer;

begin

writeln('Введите возвраст');

readln(a);

case a of

0..5: writeln('Дошкольник');

6..18: writeln ('Ученик');

19..59: writeln('Работник');

60..120:writeln ('Пенсионер');

else writeln('Вы ввели неверные данные');

end;

end.