очень надо, помогите прошу
Дано целое число К. Вывести строку-описание оценки, соответствующей числу К (1- "плохо" , 2- "неудовлетворительно" , 3 - "удовлетворительно" , 4- "хорошо" , 5- "отлично". Если К не лежит в диапазоне 1-5 , вывести "ошибка".
во вложениях скрин Паскаль АВС. должно быть правильно
Можно ещё использовать оператор выбора case
Program pr; uses crt; Var k:integer; Begin Writeln('Введите k'); readln(k); if (k>=1) and (k<=5) then <br>Begin case k of 1: Writeln('Плохо'); 2: Writeln('Неудовлетворительно'); 3: Writeln('удовлетворительно'); 4: Writeln('Хорошо'); 5: Writeln('Отлично'); end; end else Writeln('Ошибка'); readln; end.