Question

Помогите, пожалуйста, даю 100 баллов

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