Question

составить программу "Является ли введённое число чётным?"
пожалуйста оочень надо

Answer 1

var n:integer;
begin
     write('введите число');
    read(n);
if n mod 2=0 then write('данное число четное')
                  else write('данное число не явл четным');
end.

Answer 2

Любишь покороче? Тогда лучше так: