Question

Задано натуральное число a. Является ли оно чётным?
Решите задачу:
a)Используя операцию "mod"
б)Используя функцию "int".
Подробно пожалуйста.
Pascal ABC.(Полный код напишите)

Answer 1

Оператор mod возвращает остаток от деления. Четное число – такое, остаток от деления которого на 2 равен нулю.

Функция int возвращает целую часть дробного числа. С её помощью можно реализовать mod ($texttt {a mod b}$ – примерно то же самое, что и $texttt{a - b * int(a / b)}$) или сравнить результат умножения на 2 целой части результата деления исходного числа на 2 с исходным числом.

Код:

begin

   var a := ReadInteger();

   writeln(a mod 2 = 0);

   writeln(a - 2 * int(a / 2) = 0);

   writeln(a = 2 * int(a / 2));

end.

Пример ввода:

5

Пример вывода:

False

False

False

Пример ввода:

42

Пример вывода:

True

True

True