С клавиатуры вводят два целых числа. Укакого числа последний разряд (единица) меньше

Question

Информатика

Марюта

12 октября, 06:05

С клавиатуры вводят два целых числа. Укакого числа последний разряд (единица) меньше

+1

Ответы (1)

Знаете ответ на вопрос?

Игорька · Answer 1

Var

m, n, d:integer;

begin

Read (m, n) ;

d:=m mod 10 - n mod 10;

if d<0 then Writeln ('У 1-го числа разряд единиц меньше')

else

if d>0 then Writeln ('У 2-го числа разряд единиц меньше')

else Writeln ('У обоих чисел разряды единиуц равны')

end.