Составьте программу определяющую является ли последняя цифра определенного целого числа нечетным числом. пример ввода:1245 пример вывода: 5-нечетное число
Составьте программу определяющую является ли последняя цифра определенного целого числа нечетным числом.
пример ввода:1245
пример вывода:
5-нечетное число
Ответ(ы) на вопрос:
Ох уж этот Паскаль
Program zz;
var a:integer;
begin
readln(a);
a:=a mod 10;
if a mod 2=0 then writeln(a,' -четное число')
else writeln(a,' -нечетное число');
end.
Var
A:integer;
Begin
Write('A = ');ReadLn(A);
if (A mod 10) mod 2 = 0 then WriteLn(A mod 10,' - чётное число')
else WriteLn(A mod 10,' - НЕчётное число')
End.
Не нашли ответ?
Похожие вопросы