Напишите программу модель анализа вашей учебы ,которая по введенному значению вашей оценки (s) выводит сообщение < > ,если оценка = 5 и сообщение < > в другом случае

Var s:integer;
begin
readln (s);
if s=5 then writeln ('Ты молодец') else writeln ('Больше занимайся');
end.