Определи, какую задачу решает фрагмент программы, если  a — целое трёхзначное число: readln(a); k1 := a mod 10; k2 := (a div 10) mod 10; b := k2 * 10 + k1; writeln(b);

Данный фрагмент программы решает задачу перестановки двух цифр в трёхзначном числе. **Решение:** 1. Сначала программа считывает трёхзначное число, которое обозначено как переменная `a`. 2. Затем программа вычисляет последнюю цифру числа `a` (единицы) и сохраняет её в переменную `k1` с помощью операции остатка от деления на 10: `k1 := a mod 10;` 3. Далее программа вычисляет для числа `a` десятки (вторую справа цифру) путем деления числа `a` на 10 и взятия остатка от деления этого результата на 10: `k2 := (a div 10) mod 10;` 4. Далее программа формирует новое число `b`, поменяв местами цифры `k1` и `k2` таким образом, что десятки становятся единицами, а единицы - десятками: `b := k2 * 10 + k1;` 5. Наконец, программа выводит полученное число `b` с переставленными цифрами. Например, если у нас исходное число `a` равно 345, то после выполнения программы будет выведено число `b` равное 354, т.е. цифры 4 и 5 будут поменяны местами в трёхзначном числе.