Question

Дана последовательность оператора:
a:=1;
b:=2;
while a+b<8 do
begin
a:=a+1
b:=b+2
end;
s:=a+b
Сколько раз будет повторен цикл и какими будут значения переменных a,b,s после исполнения этой последовательности оператор?

Answer 1

код полностью var
    a, b, s: real;

begin
    a := 1;
    b := 2;
   
    while a + b < 8 do
    begin
        a := a + 1;
        b := b + 2;
        writeln('a = ', a, '  b = ', b);
    end;
   
    s := a + b;
    writeln('s = ', s);
end.

вывод
a = 2  b = 4
a = 3  b = 6
s = 9

Отсюда видно что цикл прокрутился 2 раза и a = 3  b = 6 s = 9