Задано натуральное число а. Является ли оно чётным ? решите задачу ,используя функцию int

Var n:integer;
begin
readln(n);
if int(n/2)=n/2 then writeln(Четное) else writeln(Нечетное)
end. 

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.