Question

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

Answer 1

На паскале:

program Project;
var
  n: integer;
begin
  Readln(n);
  if (n mod 2)=0 then
   Writeln('Да')
  else
   Writeln('Нет')
end.