Делфи, срочно, запрогайте это, умоляю на делфи По количеству баллов, набранных на ЕГЭ ,вывести оценку для аттестата (100-отлично)
Var n: integer; begin readln(n); case n of 100: writeln('отлично списал'); 80..99: writeln('не отлично списал'); 60..79: writeln('фигово списал'); 40..59: writeln('молодец'); 20..39: writeln('не молодец'); 0..19: writeln('нет слов'); else writeln('не верно ввел'); end; end.
аналогично делаются все примеры с множественным выбором