Напишите программу, выводящую слова «зачет», если введено число 3, 4 или 5 и «незачет», если введено число 1 или 2. заранее .

Begin
var z:integer:=readinteger('Введите оценку');
case z of
1,2:println('Незачёт') else println('Зачёт');
end;
end.