Циклы

Циклы

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

Виды циклов в Паскале:

с предусловием; с постусловием; с параметрами прямой (с шагом +1); обратный (с шагом -1).

С предусловием Цикл «ПОКА»	С постусловием Цикл «ДО»	Цикл с параметрами Цикл ДЛЯ
Тело цикла	Тело цикла	Тело цикла
Пока условие (логическое выражение) принимает значение истинно, выполняется тело цикла. While <условие> do <оператор>; В частности, это означает, что если в начале выполнения цикла значение <логического выражения> равно False, то цикл не выполнится ни разу. Если в теле цикла необходимо выполнить 2 и более операторов, то они объединяются в один составной оператор, с помощью операторных скобок begin и end.	До тех пор пока условие не станет истинным, повторять тело цикла. Repeat <операторы> Until <условие>; Последовательность операторов выполняется по меньшей мере один раз, ибо логическое выражение вычисляется после выполнения данной последовательности.	Для параметра цикла (i) изменяющего значения от начального значения (a), до конечного (b) с шагом h, выполнять тело цикла. А) прямой цикл – (с шагом +1) For i:= a to b do <оператор>; b) обратный цикл – (с шагом -1) For i:= a downto b do <оператор>; Если в теле цикла необходимо выполнить 2 и более операторов, то они объединяются в один составной оператор, с помощью операторных скобок begin и end. Все параметры цикла i, a, b,h должны быть простого перечислимого типа (целый, символьный, логический, диапазон, печисление).
В теле цикла необходимо предусмотреть действия обеспечивающие выход из цикла (принцип конечности алгоритма) (в цикле for предусмотрено автоматическое изменение параметра цикла с шагом ±1)

Протабулировать функцию у=х3+4 на промежутке с шагом табуляции h. (Вывести на экран координаты точек функции у=х3+4, для х изменяющей значения от а до b на величину h)
С предусловием Цикл «ПОКА»	С постусловием Цикл «ДО»	Цикл с параметрами Цикл ДЛЯ
X := х + 1   У := х3+4	X := a	У := х3+4
Var a, b, h, x, y : real; BEGIN Writeln (‘a, b, h’); Readln (a, b,h); X:= a; While x <= b do Begin Y:= x*x*x + 4; Writeln(x, y); X:= x +h; End; END.	Var a, b, h, x, y : real; BEGIN Writeln (‘a, b, h’); Readln (a, b,h); X:= a; REPEAT Y:= x*x*x + 4; Writeln(x, y); X:= x +h; UNTIL x > b; END.	Var a, b, h, x: integer; y : real; BEGIN Writeln (‘a, b’); Readln (a, b); FOR X:= a to b do Begin Y:= x*x*x + 4; Writeln(x, y); End; END.
h может быть и целым, и дробным (h=10, h=1, h=0.1)	h может быть только целым (h=1, h= -1)
Начальное значение параметра цикла задается до цикла. Изменять параметр цикла обязательно в теле цикла, чтобы цикл когда-нибудь завершился.	Начальное значение, конечное и шаг изменения задается в операторе for. Параметр цикла изменяется автоматически.
	Цикл выполняется хотя бы один раз обязательно
Необходимы операторные скобки		Необходимы операторные скобки
Условие цикла x <= b	Условие цикла x > b (противоположны)