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

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