Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
твтаьвлвлвлвлидинаа
var
a,b: integer;
begin
write('введите в одной строке два целых числа и нажмите < enter> ');
readln(a,b);
if a=b then writeln('числа равны')
else
if a> b then writeln(a,' больше')
else writeln(b,' больше')
end.
то что подчеркнуто на минимальный возвраст группы заменить.
? "введите возвраст человека"
input a
if a> пенсионер then 1 else 2
1 ? "группа пенсионеров" : goto 10
2 if a> работник then 3 else 4
3 ? "группа работников" : goto 10
4 if a> ученик then 5 else 6
5 ? "группа учеников" : goto 10
6 ? "группа дошкольников"
10 end
Популярные вопросы