Объясните пожалуйста, не разумею как делать.. Заблаговременно большое спасибо

1)

а = 2

b = 27

2)

Ответ: нужно ввести число 432

3) Код:

var

 x, a, b, c:integer;

Begin

 write('Введите трехзначное число: ');

 readln(x);

 a:= x div 100;

 b:= x div 10 mod 10;

 c:= x mod 10;

 writeln('Вы ввели число: ', x);

 writeln('Число: ', c, b, a);

END.

Разъясненья:

1) a = 187; при b:= (a div 10) + 9 мы а (т.е 187) разделяем на 10 и добавляем к результату 9, получаем 27.

а= 2, т.к. мы умножаем 10 на b (27) и отнимаем a (187), получаем 83. Функция mod означает получение остатка от дробленья на 9, т.е. делим 83 на 9 и получаем остаток, а именно 2.

2) 432 делим на 100, получаем а = 4, разделяем 432 на 10 и получаем остаток от разделенья на 10 результата, получаем b = 3, далее получаем остаток от разделения на 10 числа 432 и получаем 2.

3) Тут все достаточно просто, мы разбили трехзначное число на доли и с подмогою оператора вывода writeln, вывели число в оборотном порядке, т.е. поменяли местами первую и заключительную цифры.