Школьная отметка обозначается цифрой и имеет название. написать программу, которая определяет по значению отметки, записанной цифрой ее название.

Program z;
var a:integer;
begin
writeln ('введите отметку'); read (a);
case a of
2: writeln ('неудовлетворительно');
3: writeln ('удовлетворительно');
4: writeln ('хорошо');
5: writeln ('отлично');
end;
end.