5.2.22. Опе­ра­тор цик­ла со счет­чи­ком

Опе­ра­тор цик­ла со счет­чи­ком за­да­ет, в от­ли­чие от цик­ла с ус­ло­ви­ем, яв­но за­дан­ное ко­ли­че­ст­во вы­пол­не­ний цик­ла и име­ет сле­дую­щий вид:

for   Переменная =  На­чалЗнач   to    Ко­нечЗнач    step   При­ра­ще­ние

       Груп­паОпе­ра­то­ров

next    Переменная 

Он со­сто­ит как ми­ни­мум из трех строк: на­чаль­ной с име­нем пе­ре­мен­ной-счет­чи­ка (Переменная ); од­ной или не­сколь­ких строк, за­даю­щих Груп­пуОпе­ра­то­ров, и за­вер­шаю­щей стро­ки ви­да "next    Переменная". В на­чаль­ной стро­ке ука­зы­ва­ют­ся три чи­сло­вых вы­ра­же­ния: На­чалЗнач, Ко­нечЗнач и При­ра­ще­ние, оз­на­чаю­щие со­от­вет­ст­вен­но на­чаль­ное зна­че­ние пе­ре­мен­ной-счет­чи­ка, ее ко­неч­ное зна­че­ние и ве­ли­чи­ну при­ра­ще­ния, на ко­то­рую ме­ня­ет­ся зна­че­ние пе­ре­мен­ной-счет­чи­ка на ка­ж­дом сле­дую­щем ша­ге вы­пол­не­ния. В на­чаль­ной стро­ке мож­но не ука­зы­вать со­че­та­ние "step   При­ра­ще­ние". В этом слу­чае счи­та­ет­ся, что При­ра­ще­ние рав­но 1.

Здесь, FOR, NEXT, STEP - ключевые слова состветственно: с анг­лийского - для, следующий, шаг.

Опе­ра­тор цик­ла со счет­чи­ком эк­ви­ва­лен­тен сле­дую­щей по­сле­до­ва­тель­но­сти опе­ра­то­ров:

Переменная =  На­чалЗнач 

do   while   Переменная ЗнакСравнения   Ко­нечЗнач    

       груп­па опе­ра­то­ров

       Переменная = Переменная + При­ра­ще­ние

loop

Для по­ло­жи­тель­но­го зна­че­ния При­ра­ще­ния ЗнакСравнения есть знак опе­ра­ции МЕНЬ­ШЕ-ИЛИ-РАВ­НО (<=). Для от­ри­ца­тель­но­го зна­че­ния При­ра­ще­ния это   знак опе­ра­ции БОЛЬ­ШЕ-ИЛИ-РАВ­НО (>=).

Пример. Программа нахождения суммы первых восьми нечетных це­лых чисел.

DIM I AS INTEGER, J AS INTEGER

J=0

FOR I=1 TO 15 STEP 2

J=J+I

NEXT

PRINT "сумма равна",J