Объяснение:
условие четности - остаток от деления на 2 равен нулю.
Следовательно,
if (X mod 2 == 0) then f = true;
