Информатика, вопрос задал 7yt4zg2w5r , 1 год назад

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

Ответы на вопрос

Ответил YolandaProgramme
0

Ответ:

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.

Новые вопросы