делфи, срочно, запрогайте это, умоляю на делфи

По количеству баллов, набранных на ЕГЭ ,вывести оценку для аттестата (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.