Перевести 5и бальную оценку в её наименование . Срочно

Question

Перевести 5и бальную оценку в её наименование . Срочно

Answer 1

Var
  n:integer;

begin
  Write('Введите оценку (1..5): '); Read(n);
  case n of
  1:Writeln('Неудовлетворительно');
  2:Writeln('Неудовлетворительно');
  3:Writeln('Удовлетворительно');
  4:Writeln('Хорошо');
  5:Writeln('Отлично');
  else Writeln('Неверный ввод')
  end
end.

Пример
Введите оценку (1..5): 4
Хорошо

Answer 2

Javascript:var оценка=prompt("Оценка:"), описание=(оценка==5?"Пойдёт":(оценка==4?"Тупень":(оценка==3?"Дaун":(оценка==2?"Дeбил":(оценка==1?"Биомасса":"ПНХ")))));alert(описание);