Вложенные циклы

End.

Begin

После выхода из цикла параметр цикла становится неопределенным, за исключением случая, когда выход из цикла был осуществлен с помощью оператора GOTO или стандартной процедуры BREAK.

Параметру цикла присваивается

Одного типа.

Конечное значения должны быть

Параметр цикла, начальное и

Шаг для параметра цикла равен -1.

Шаг для параметра цикла равен 1.

Оператор цикла FOR используется, если число итераций(повторений) цикла известно до начала выполнения цикла.

Оператор цикла FOR

(цикл с параметром).

Формат записи:

1). FOR <п.ц.>:=<н.з.>TO<к.з.>DO<оператор>,

где:

параметр цикла <п.ц.> -
переменная любого порядкового типа;

начальное значение <н.з.> –выражение,
определяющее начальное значение

параметра цикла;

конечное значение <к.з.> -выражение,
определяющее конечное значение

параметра цикла;

оператор – простой или составной

оператор;

for i:=1 to 5 do s:=s+i;

2). FOR <п.ц.>:= <к.з.> DOWNTO <н.з.> DO <оператор>,

где:

Порядок выполнения цикла:

1). Вычисляется выражение <н.з.>;

значение <н.з.>;

3) вычисляется выражение <к.з.>;

4) значение параметра цикла сравни-

вается с <к.з.> (сравнение идет
до выполнения <оператора>).

Если значение параметра цикла <=
конечного значения, то выполняется
очередная итерация цикла, если нет,
то происходит выход из цикла.

5) параметр цикла наращивается на 1 и
сравнивается с конечным значением и
т.д.

2). Вычислить 10!

Program Factorial_3;

Var i, F: integer; { longint }

F:=1;

For i:=1 to 10 do F:=F*i;

Writeln(‘F=’,F);