Составьте программу на языке паскаль,с ветвлящейся структурой которая определяет четное или нечетное введенное число

1

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

2013-03-27T09:25:48+04:00

var
x:integer;
begin
readln(x);
if x mod 2<>0 then writeln ('Не четное')
else writeln ('Четное');
end.