Оператор цикла For . Next

Предназначен для организации циклов.

Синтаксис оператора:

For х = xn to xk [ step x ]

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

Next [x]

где: x – параметр цикла (переменная);

xn, xk - начальное и конечное значение (арифметические выражения);

step x – шаг изменения х (по умолчанию шаг =1);

Next - конец области действия оператора цикла.

Функционирование оператора определяется из его блок – схемного представления. Полная блок – схема For... Next (рис. 15.1). Блок — схема с блоком модификации (рис. 15.2). Выход из цикла при x>xk.

Таким образом, алгоритм и программа будет выглядеть следующим образом (рис. 15.3):

		Private Sub CommanButton1_Click Dim x, y, xn, xk, dx As Single xn=-1: xk=1: dx=0.2 For x=xn to xk step dx y=x^2 Debug.Print “ x= “; x; “ y=”; y Next x End Sub

Рис. 15.3. Блок – схема с защитой входа

15.3. Операторы циклов типа Do (выполнить)

Существуют два оператора Do While (пока)и Do Until (до).

С помощью этих операторов могут быть организованы два типа циклов:

1. С защитой входа в цикл (с предусловием).

2. С свободным входом в цикл (с послеусловием)