* Данный текст распознан в автоматическом режиме, поэтому может содержать ошибки
Г л а в а VII. У п р а в л я ю щ и е о п е р а т о р ы я з ы к а Б е й с и к 45 Если в операторе применяется ключевое слово U N T I L , то цикл выполняется до тех пор, пока условие не станет истинным. После того, как условие будет удовлетворено, управление будет передано опе¬ ратору, следующему за LOOP. Пример 7.8.1. 'программа, вычисляющая сумму первых n членов ряда 1+1/2+1/3+....1/n. CLS 'очистка экрана дисплея INPUT "введите число членов ряда"; n a 1 : S = 1 : j = 1 'S-сумма ряда; j-переменная цикла DO W H I L E j < n 'начало цикла, делать, п о к а J < n S = S + 1 / ( j + 1 ) 'накапливаем сумму ряда j = j + 1 'изменяем переменную цикла LOOP 'конец цикла PRINT "сумма ряда равна "; S 'печать результата INPUT "закончить работу(0-да,число членов ряда — н е т ) " ; n I F n <> 0 GOTO a 1 END Условие выполнения цикла D O - W H I L E ( U N T I L ) - L O O P проверяется перед выполнением блока_операторов. Очевидно, что внутри цикла переменные, присутствующие в записи условия, должны меняться, иначе произойдет зацик¬ ливание программы. Также очевидно, что в случае, если условие цикла перед входом в цикл ложно, то блок операторов не выполняется ни разу. 7.9. О п е р а т о р D O - L O O P - W H I L E ( U N T I L ) - и т е р а ц и о н н ы й ц и к л 3 Оператор D O - L O O P - W H I L E ( U N T I L ) повторяет блок операторов, пока усло¬ вие верно, или д о тех пор, пока условие не станет верным. Формат оператора D O - L O O P - W H I L E ( U N T I L ) : DO [ блок_операторов] LOOP [{WHILE,UNTIL} условие] где Условие — любое выражение Бейсика, которое может быть оценено, как истинное (не ноль) или ложное (ноль) Блок_операторов — одна или несколько строк операторов Бейсика. Если не¬ сколько операторов записаны в одной строке, то они должны быть разделены двоеточием. Если в операторе применяется ключевое слово W H I L E , то цикл выполняется до тех пор, пока условие истинно. Если в операторе применяется ключевое слово U N T I L , то цикл выполняется до тех пор, пока условие не станет истинным. После того, как условие будет удовлетворено, управление будет передано опе¬ ратору, следующему за LOOP.