Рассмотреть данную задачу с использованием оператора условного перехода : IF условие THEN действие
var o: longint;
begin
Readln(o);
if o = 5 then Writeln('Отлично')
else
if o = 4 then Writeln('Хорошо')
if o = 2 then Writeln('Неудовлетворительно')
Writeln('Ошибка');
end.