Опубликовано 11.06.2017 по предмету Информатика от Гость >> <<

Составьте,программу,определяющую,является ли последняя цифра введенного целого числа нечетным числом

Ответ оставил Гость

var a:integer; 
begin  
writeln(Введите целое число); 
read(a); 
if ((a mod 10) mod 2=1) then writeln(Последняя цифра числа - нечетная.) 
else writeln(Последняя цифра чиста - четная.); 
end.