Question

Даны два трёхзначных числа. Найти разность первых цифр этих чисел. Информатика паскаль

Answer 1

Ответ:

var

a, b, diff: integer;

begin

// считываем два трехзначных числа

readln(a);

readln(b);

// находим первые цифры чисел

a := a div 100;

b := b div 100;

// находим разность первых цифр

diff := abs(a - b);

// выводим результат

writeln(diff);

end.