Составить прогаммму проверки четности числа х mod 2=0

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

Пожалуйста, успехов!

Так вы уже практически написали программу. Осталось только чуть-чуть приукрасить код:var  x: integer;begin  readln(x);  if x mod 2 =0 then writeln(x,' четное') else writeln(x,' нечетное');end.