Задан средний бал ученика,к какому уровню знаний относится ученик,тема паскаль

Program abc; 
var a:integer;
begin
writeln(Введите оценку ученика);
readln(a);
if (a>2)  then
writeln(Удовлетворительный уровень знаний);
if (a<=2)then
writeln(Не удовлетворительный уровень знаний);
end.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.