Составьте программу, определяющую, является ли последняя цифра введенного целого числа четным или нечетным числом. Желательно с объяснением. Пример ввода: 12345 Пример вывода: 5 -- нечетное число
Var n,d:integer; begin Readln(n); d:=n mod 10; Write(d,' -- '); if d mod 2 = 0 then Writeln('четное число') else Writeln('нечетное число') end.
Жалко что без объяснения, а так все норм.