* Данный текст распознан в автоматическом режиме, поэтому может содержать ошибки
40
Языки Бейсик
Пример 7.3.1.
CLS a 1 : INPUT " 1 или 2 ? " , i % I F i % = 1 O R i % = 2 T H E N PRINT " o k " ELSE PRINT "вне интервала" GOTO a 1 END I F 7.4. О п е р а т о р I F - G O T O — о п е р а т о р у с л о в н о г о п е р е х о д а
Оператор IF-GOTO обеспечивает либо переход GOTO, либо выполнение по¬ следовательности операторов, следующих за оператором IF-GOTO. Формат оператора IF-GOTO: I F условие GOTO метка_выражения где Условие любое выражение Бейсика, которое может быть оце¬ нено, как истинное(не ноль) или ложное(ноль)
Метка_выражения имя переменной типа метки, которой помечено выра жение, которому передается управление. Если управление передано на невыполняемый оператор(ИЕМ, D A T A и т.п.), то выполнение программы будет продолжено с первого встретившегося выпол¬ няемого оператора. Пример 7.4.1.
CLS 'очистка экрана монитора I F a = 0 GOTO b 'условный переход на метку b PRINT "не работает" DO: LOOP WHILE INKEY$ = "" 'остановка до нажатия любой клавиши b: PRINT "работает" END 7.5. О п е р а т о р F O R - T O - N E X T - а р и ф м е т и ч е с к и й ц и к л .
Операторы FOR-TO (для — к) и NEXT(следующий) объединяют в один блок группу операторов, предназначенных для многократного выполнения. Формат записи оператора: FOR пеpем._циклa=нaч._знaч.TO кон._знач. [STEP знач_шага_цикла] тело цикла NEXT где [перем._цикла]