Определить является ли целое число N четным.Использовать оператор mod-остаток от деления

var   a : integer;                     //объявляем переменнуюbegin writeln(\'Введите число:\'); // выводим строку на экран readln(a);                        // считываем введенное с клавиатуры число if (a mod 2 = 0) then       // проверяем четность числа, вычисляя остаток от деления на 2     writeln (\'Число \', a, \' является четным\')  // выводим строку на экран else    writeln (\'Число \', a, \' является нечетным\')  // выводим строку на экранend.