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

Question

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

---

Answer 1

Ответ:

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

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

---

Comments

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

---

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

---

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

---

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