Then begin

y:=0.5/z;

x:=tan(z+1.);

go to m1

end;

§9. Операторы цикла for-to-do, for-downto do, while-do.

а) простые циклы for-to-do и for-downto do позволяют организовать повторяющиеся действия, количество которых определяется счетчиком цикла (целой переменной), начальное и конечное значение которого задается в операторе цикла. После выполнения одного цикла значение счетчика в цикле for-to-do увеличивается на единицу, а в цикле for-downto do уменьшается на единицу. Когда значение счетчика цикла выйдет за пределы конечного значения, цикл вычислений заканчивается. Если внутри цикла требуется выполнить несколько действий, то выделяется блок таких действий с помощью служебных слов beginиend. Циклы for-to-do и for-downto do имеют следующий формат:

forимя счетчика:=начальное значение toконечное значение do

действие;

forимя счетчика:=начальное значение downtoконечное значение do

Begin

действие 1;

..................

действие n;

end;

Действие оператора заканчивается точкой с запятой.

Примеры:

for i:=-1 to 30do

Begin

y:=4+z;

x:=atan(y/z);

end;

for i:=400 downto k do

sqrt:=(4+x)/(a+exp(x));

б)цикл while-do используется для организации цикла вычислений при выполнении какого-то условия (когда условное выражение принимает значение “истина” (true). Онимеет следующий формат:

whileусловное выражение do

действие;

whileусловное выражение do

Begin

действие1;

..................

действие n;

end;

Действие заканчивается точкой с запятой.

Пример:

x:=1;

while x<100 do

begin

x:=x*5;

y=cos(x+3);

end;