. Игрок А объявляет двузначное число от 01 до 99. Игрок В меняет местами его цифры и прибавляет полученное число к сумме его цифр. Полученный результа - Pascal

Формулировка задачи:

. Игрок А объявляет двузначное число от 01 до 99. Игрок В меняет местами его цифры и прибавляет полученное число к сумме его цифр. Полученный результат он объявляет игроку А. Игрок А проделывает с этим числом ту же процедуру, и так они продолжают поступать поочередно, объявляя числа. От суммы чисел берется остаток от деления на 100, поэтому объявляются лишь двузначные числа. Какие числа может объявить игрок А на начальном шаге, чтобы игрок В в некоторый момент объявил число 00.

Решение задачи: «. Игрок А объявляет двузначное число от 01 до 99. Игрок В меняет местами его цифры и прибавляет полученное число к сумме его цифр. Полученный результа»

Листинг программы

var a,x,b,i,j:integer;
begin
x:=100;
b:=100;
 begin
  b:=b-1;
  for i:=0 to 9 do
  for j:=0 to 9 do
  if 11*j+2*i=100 then
   begin
    a:=10*i+j;
    write(a);
   end;
 end;
end.

Объяснение кода листинга программы

a, x, b, i, j - объявление переменных типа integer.
x присваивается значение 100.
b присваивается значение 100.
Начало вложенного блока.
b уменьшается на 1.
Цикл for i от 0 до 9.
Цикл for j от 0 до 9.
Если 11*j+2*i равно 100, то выполняется вложенный блок.
a получает значение 10*i+j.
Значение a выводится на экран с помощью write(a).
Конец вложенного блока.
Конец программы. Код находит и выводит двузначное число a, удовлетворяющее условию 11*j+2*i=100.