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

Решим эту задачу на языке программирования Pascal ABC. Введем обозначения следующих величин: пусть a, b, c – заданные величины целого типа. Будем использовать оператор цикла с предусловием while и оператор проверки условия if. Тогда программа может выглядеть так:

program zadacha;

uses crt;

var a, b, c: integer;

begin

a:=3; b:=9; c:=0; {Задание исходных значений величин a, b, c}

while b>a do 

if a+c>b then begin

c:=c+1; a:=a+2;

end

else

begin c:=c+2; b:=b+1;

end;

writeln (\'c=\',c) {Вывод полученного значения величины с на экран}

end.

После выполнение данной программы получим, что значение величины с станет равной 21.

Ответ: с = 21.