Написать программу на языке паскаль
Определить является ли число четным или нечетным

vara : integer;beginreadln (a);if a mod 2 = 0 thenwriteln ('число является чётным');elsewriteln ('число не является чётным');end.