Решите задачу в программе PASCALABC.NET

0 голосов
64 просмотров

Решите задачу в программе PASCALABC.NET


image

Информатика (87 баллов) | 64 просмотров
Дан 1 ответ
0 голосов
Правильный ответ

Ответ:

  • var n: integer;
  • begin
  • readln(n);
  • if n in (40..50) then writeln('легкий')
  • else if n in (51..70) then writeln('средний')
  • else writeln('тяжелый') ;
  • end.

Пример работоспособности:


image
(3.7k баллов)
0

пишет встреченно .. а ожидалось )

0

"пишет встреченно .. а ожидалось"
Обновите IDE (скачайте свежую версию PascalABC.NET)

0

n in a..b <=> (a<=n) and (n>=b)

0

Нововведение версии 3.6.0