Question

Пожалуйста срочно !!Cоставьте программу которая определяет введенное число частное или не частное Я не очень разбираюсь в информатике

Answer 1

Var i:longint;
begin
read(i);
if i mod 2<>0 then write('Не четное') else write('четное');
end.