У исполнителя Бета две команды, которым присвоены номера: 1. прибавь 3 2. умножь на d (d неизвестное натуральное число; d≥2 Выполняя первую из них, Бета увеличивает число на экране на 3, а выполняя вторую, умножает это число на d. Программа для исполнителя Бета - это последовательность номеров команд. Известно, что программа 11211 переводит число 3 в число 186. Определите d.

(3+3)+3)*х)+3)+3)=186
9х+6=186
9х=180
х=20
Сделаем проверку:
3+3=6
6+3=9
9*20=180
180+3=183
183+3=186
Твой ответ: 20

Вместо буквы d я взяла х, так просто удобней .

Объяснение:

1)У тебя спрашивают b=1? У тебя дано b=3, значит b!=1. Если нет, то переходим к следующим указаниям: с=с-b=4-3=1, b=b+c=3+1(Потому что в предыдущем шаге мы дали новое значение для c, вернее произвели математическую операцию с ним. Возвращаемся(Слева линия) снова к логическому условию. Я честно говоря ХЗ, что они тут имели ввиду, но после того, что я описал c=1,но если мы продолжим проверку b=1, то c начнет принимать отрицательные значения. Цикл вышел, как мне кажется.

Теперь мне лень расписывать - держи фото/скрины

Не знаю, что у тебя за язык программирования, но я сделал тоже самое на Python, вроде результат отличатся не должен.

1. В приведенном коде ошибка. Не хватает ";" в третьей строке снизу.
2. Немного изменим ваш код и получим искомое значение x
Искомое число х = 16293

var
  x, y, a, b, k: integer;

begin
  k:=10000;
  repeat
    x:=k;
    a := 0; b := 0; y := 1;
    while x > 0 do
    begin
      if (x mod 10) mod 2 = 0
        then
        a := a * 10 + x mod 10
      else begin
        y := y * 10;
        b := b * 10 + x mod 10
      end;
      x := x div 10
    end;
    a := a * y + b;
    k := k + 1;
    until a = 26391;
    writeln(a:8, k-1:8); 
end.