
* Данный текст распознан в автоматическом режиме, поэтому может содержать ошибки
Г л а в а VII. У п р а в л я ю щ и е о п е р а т о р ы я з ы к а Б е й с и к 41 является числовой переменной. Перем._цикла Нач._знач.и кон._знач. могут быть числовой константой или арифметическим выражением. может быть как числовой константой, так и числовой Знач_шага_цикла переменной, положительной или отрицательной. Ес¬ ли операнд STEP опущен, то значение шага равно 1. При обращении к оператору FOR-TO сначала вычисляется шаг, начальное и ко¬ нечное значение. Если при положительном значении шага полученное значение пе¬ ременной цикла меньше или равно конечному значению, то выполняется последо¬ вательность операторов, следующая за оператором FOR-TO(тело цикла). Если по¬ лученное значение переменной цикла больше конечного значения, то происходит выход из цикла и управление передается оператору, следующему за NEXT. При от¬ рицательном значении шага значение переменной цикла уменьшается с каждым циклом. Цикл выполняется до тех пор, пока значение переменной цикла не станет меньше конечного значения. Если при входе в блок FOR-TO заданное условие не выполняется, то управление сразу передается оператору, следующему за операто¬ ром NEXT. Блоки FOR-TO могут быть вложенными друг в друга. Пример 7.5.1. Посчитать число счастливых билетов в катушке автобусных билетов с номера¬ ми от 000 000 до 999 999. Счастливым считается билет, у которого сумма пер¬ вых трех цифр равна сумме последних трех цифр. 'Программа подсчета счастливых билетов F O R i = 0 T O 9 'цикл на первую цифру F O R j = 0 T O 9 'цикл на вторую цифру F O R k = 0 T O 9 'цикл на третью цифру F O R l = 0 T O 9 'цикл на четвертую цифру F O R m = 0 T O 9 'цикл на пятую цифру F O R n = 0 T O 9 'цикл на шестую цифру 'если совпали, то суммируем I F i + j + k = l + m + n T H E N s = s + 1 NEXT n 'конец шестого цикла NEXT m 'конец пятого цикла NEXT l 'конец четвертого цикла NEXT k 'конец третьего цикла NEXT j 'конец второго цикла NEXT i 'конец первого цикла CLS 'очистка экрана PRINT "число счастливых билетов="; s 'печать числа счастливых билетов END 'конец программы По концу р а б о т ы программа напечатает число 55 252. Цикл называется арифметическим потому, что до начала цикла переменная цик¬ ла должна быть определена, то есть цикл выполняется определенное число раз. Если в блоке не указан оператор FOR-TO или N E X T , то выдается сообщение: NEXT без FOR или FOR без NEXT