Составьте программу, которая определяет, является ли введённое целое число нечётным, и...

Question

Составьте программу, которая определяет, является ли введённое целое число нечётным, и выводит на экран соответсвтующее сообщение: "Да" либо "Нет"

Answer 1

Var
    n: integer;

begin
    readln(n);
    if n mod 2 = 0 then
        writeln('Да')
    else
        writeln('Нет')
end.