дано натуральное число определить является ли оно четным (паскаль)

1

Ответы и объяснения

2014-03-22T08:24:29+00:00
Могут быть небольшие ошибки
var a: integer;
begin
readln (a);
if (a mod 2)=0 then
writeln ('да')
else
writeln ('нет');
end.