Задание

Работа каких операторов дает верный ответ?

if i mod 2 = 0 then writeln (i,' четное')

else writeln (i,' нечетное');

if i mod 2 <> 0 then writeln (i,' нечетное')

else writeln (i,' четное');

if i div 2 <> 0 then writeln (i,' нечетное')

else writeln (i,' четное');

if i div 2 then writeln (i,' четное')

else writeln (i,' нечетное');

if i / 2 <> 0 then writeln (i,' четное')

else writeln (i,' нечетное');

if i div 2 = 0 then writeln (i,' четное')

else writeln (i,' нечетное');