Question

Составьте программу, определяющую, является ли последняя цифра введенного целого числа четным или нечетным числом. Желательно с объяснением.
Пример ввода:
12345
Пример вывода:
5 -- нечетное число

Answer 1

var
  n,d:integer;
begin
  Readln(n);
  d:=n mod 10;
  Write(d,' -- ');
  if d mod 2 = 0 then Writeln('четное число')
  else Writeln('нечетное число')
end.