Дано натуральное число.Определить является ли оно чётным. Паскаль!!

Question

Дано натуральное число.Определить является ли оно чётным. Паскаль!!

Answer 1

Еще прикреплен с паскалевским файлом
var n:integer;
begin
writeln('vvedi chislo');
readln(n);
if n mod 2=0 then writeln ('chetnoe') else writeln ('ne chetnoe');
readln;
end.