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