Операторы организации циклов.

Оператор цикла является важнейшим оператором и имеется в большинстве современных языков программирования, а сама идея цикла возникла еще в XIX веке. Цикл позволяет многократно выполнить некоторую последовательность действий, которая задается операторами, составляющими тело цикла.

Начнем с оператора цикла с предусловием. Данный оператор имеет вид:

While <условие> do <оператор>.

При выполнении этого оператора вначале вычисляется значение логического выражения. Если это значение истинно, выполняется оператор. Затем значение выражения проверяется вновь, и все повторяется до тех пор, пока выражение не примет значение «ложь». Каждое выполнение цикла иногда называют итерацией цикла. Если выражение принимает значение «ложь» при первой же проверке, то оператор не выполняется вообще.

В цикле с предусловием предварительной проверкой определяется, выполнять тело цикла или нет, до первой итерации. Если это соответствует логике алгоритма, то можно использовать цикл с постусловием.

Цикл с постусловием имеет вид:

Repeat…<выражние_1>until…<выражение_2>

Здесь вначале выполняется оператор statement(утверждение), и только затем вычисляется значение логического выражения. Именно поэтому такой цикл называют циклом с постусловием. Процесс повторяется, пока выражение имеет значение «ложь». Как только его значение становится истинным, выполнение цикла прекращается. Оператор может быть любым, в том числе и составным оператором:

Repeat

Оператор_1;

Оператор_2;

…………….

Оператор_N;

Until<условие>

В цикле repeat...until проверка выполняется в последнюю очередь, и тело цикла в любом случае выполняется хотя бы один раз.

Операторы цикла со счетчиком: for...to...do и for…downto …do.

Третий вариант оператора цикла - цикл с параметром. Можно считать, что есть две очень похожих друг на друга разновидности цикла со счетчиком. Первый из этих операторов имеет вид:

For параметр цикла:= начальное значение to конечное значение do <оператор>;

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

После выполнения цикла for значение управляющей переменной становится неопределенным.

Вариант for…downto...do... цикла for аналогичен циклу for..to…do за исключением того, что в нем управляющая переменная на каждом шаге выполнения не увеличивается, а уменьшается на единицу:

for j :- <выражение_1> downto <выражение_2> do <оператор>.

Подводя итоги, для применения циклов можно сформулировать следующие рекомендации:

Используйте цикл for в том случае, когда точно знаете, сколько раз должно быть выполнено тело цикла. В противном случае обратитесь к циклам repeat или while.

· Используйте while, если хотите, чтобы проверка была произведена прежде, чем будет выполняться тело цикла.

· Иногда бывает удобно проводить проверку на возможный выход из цикла где-нибудь в его середине, а не в начале или конце.

Такой выход из цикла обеспечивается процедурой Break, которая прерывает выполнение самого внутреннего вложенного цикла, будь то for, while или repeat. Указанный модуль подключается к программе автоматически, если в этом есть необходимость.

Пример:

While true do begin

<Выражение_1>

If <оператор> then Break

<Выражение_2>; end

Следует также упомянуть процедуру Continue, которая прерывает выполнение тела самого внутреннего цикла for, while или repeat и передает управление на его заголовок, так что начинается выполнение очередной итерации цикла.

Шаг цикла for всегда постоянный и равен интервалу между двумя ближайшими значениями типа параметра цикла.

Var {описание параметров цикла}

i: integer(целочисленный тип);

c: char(символьный тип);

1. Begin {вывод на печать целых чисел от 1 до 10}

For i:=1 to 10 do writeln (i);{шаг цикла равен 1}

2. {вывод на печать чисел от 10 до -10}

For 10 down to -10 {шаг цикла равен -1}

Writeln(i);

3. {вывод на печать латинских символов от A до R}

{параметр цикла изменяется от A до R в алфавитном порядке}

For c:=‘A’ to ‘R’ do writeln (c);

End.

Выполнение цикла начинается с присвоения параметру стартового значения. Затем следует проверка, не превосходит ли параметр конечное значение. Если результат проверки утвердительный, то цикл считается завершенным и управление передается следующему за телом цикла оператору. В противном случае выполняется тело цикла и параметр меняет свое значение на следующее согласно заголовку цикла. Далее снова производится проверка значения параметра цикла, и алгоритм повторяется.

Пример: Вычисление суммы от 1 до n.

var s,n,i: integer;

begin

writeln (‘Введите n’);

read (n);

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

writeln (‘s=’,s);

end. [17,13]