пожалуйста помогите по информатике

Question

написать программу спрашивающая у ученика его оценку по информатике: если отметка 5 то напечатать "молодец" иначе напечатать "подтянись"

большое Спасибо!!!)))

большое Спасибо!!!)))

Денис Рыжов · Accepted Answer

program one; 
uses crt; 
var x: integer; 
begin 
writeln ('Введи свою оценку'); 
readln(x); 
if x=5 then writeln ('Молодец! '); 
if x<5 then writeln ('Подтянись'); 
end. 
Вот, пожалуйста.