Исходник маленькой программы для паскаля, задача которой является определение чётности числа. Если число чётное, то выводит - число чётное, если нет, то выводит - число не чётное. В данной программе используется оператор MOD. Есть пояснительные комментарии к каждой строке. Скачать исходник и увидеть исходный код программы вы можете дальше.,
Исходный код программы определение чётности числа:
Program cht; //Название программы
var a: integer; //Описание переменных
Begin //Начало программы
Writeln ('Введите число'); //Диалог с пользователем
Readln (a); //Считывание числа
if a mod 2 = 0 then //Проверка на чётность
writeln ('Это число чётное') //Вывод, если чётное
else //Иначе
writeln ('Число нечётно'); //Вывод на нечётное
end. //Конец программыСкачать исходник: chetnost.pas