При выполнении фрагмента программы операторы, составляющие тело цикла, выполнятся … раз: A:=1; While A<=100 Do<br> Begin A:=A*2; End;