Вычислите, чему равняется значение переменной С, после выполнения следующего алгоритма: А = 3 В = 9 С = 0 пока B>A

Решение задачи:Исходные данные: A = 3; B = 9; C = 0.1. Проверим, выполняется ли условие B > A: 9 > 3 – да, выполняется. Следовательно, реализуем следующий алгоритм:если А + C > B то (С = C + 1; A = A + 2) иначе (С = C + 2; B = B + 1).3 + 0 > 9 (- неверное утверждение), значит: С = C + 2; B = B + 1;C = 0 + 2; B = 9 + 1;C = 2; B = 10.2. B > A: 10 > 3 – да.А + C > B: 3 + 2 > 10 – нет, следовательно:С = C + 2; B = B + 1;C = 4; B = 11.3. B > A: 11 > 3 – да.А + C > B: 3 + 4 > 11 – нет.С = C + 2; B = B + 1;C = 6; B = 12.4. Аналогично предыдущим пунктам: C = 8; B = 13. Затем C = 10; B = 14. И C = 12; B = 15.5. B > A: 15 > 3 – да.А + C > B: 3 + 12 > 15; 15 > 15 – нет. Значит C = 14; B = 16.6. B > A: 16 > 3 – да.А + C > B: 3 + 14 > 16; 17 > 15 – да.С = C + 1; A = A + 2;C = 14 + 1; A = 3 + 2;C = 15; A = 5.7. Аналогично пункту 6: C = 16, A = 7; C = 17, A = 9;C = 18, A = 11;C = 19, A = 13;C = 20, A = 15;C = 21. A = 17.8. B > A: 16 > 17 – нет. Цикл остановлен.Ответ: 21.Решение в PaccalABC.NET:var a, b, c: integer;begina:=3;b:=9;c:=0;while b>a do beginif (a+c)>b then begin c:=c+1; a:=a+2; end else begin c:=c+2; b:=b+1; end;end;writeln(c);end.