Дано трёхзначное число. Определить, что оно чётно.
program zzz;
var x:integer;
begin
writeln(vvedi chislo);
readln(x);
if x mod 2=0 then writeln(×åòíîå) else writeln(Íå÷åòíîå)
end.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
