Составьте программу определяющую, является ли последняя цифра введенного целого числа чётной
Var
n:integer;
begin
readln(n);
n:=n mod 10;
if n mod 2 = 0 then writeln(Цифра ,n, является четной)
else writeln(Цифра ,n, не является четной);
end.
Оцени ответ
