Question

дана последовательность операторов a=1 b=1 while a<2 do

begin b:=b+2 end

s= a+b сколько раз выполнится цикл найдите конечный результат

спасибо!

Answer 1

Если всё так как написанно, то программа вообще не скомпилируется. Должно быть

a:=1;b:=1;

while a<2 do

     begin

       b:=b+2;
     end;

 s:=a+b;
      
в теле цикла переменная а не изменяется, поэтому цикл будет бесконечным. То есть пока Ctrl-Break не нажмешь будет кажаться что программа зависла.