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

Question

Информатика

Тигрий

14 марта, 05:10

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

+5

Ответы (2)

Знаешь ответ?

Еля · Answer 1

Var

a, b, d:integer;

begin

Read (a, b);

d:=a mod 10 - b mod 10;

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

else

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

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

end.

Евлампия · Answer 2

1 0 / {x} 1 0 * 1 0 / {x} 1 0 * - x<0 20 2 С/П / - / x<0 25 1 С/П 0 С/П

Выводит 1, 2 или 0, если последние разряды равны.