Оператор цикла for … next
FOR <счетчик> = <начало> TO <конец> [STEP <приращение>]
[блок операторов]
NEXT [счетчик]
[счетчик] - числовая переменная (переменная цикла),
<начало> , <конец> - начальное и конечное значение счетчика,
<приращение> - приращение счетчика при каждом шаге цикла.
Если приращение равно 1, то выражение в квадратных скобках может быть опущено. То есть по умолчанию шаг изменения переменной цикла равен единице.
Пример:
FOR I = 1 TO 15 FOR I = 7 to -6 STEP -3
PRINT I PRINT I
NEXT I NEXT I
Оператор цикла do … loop
Оператор цикла DO … LOOP - оператор цикла с предусловием, без счетчика (с неопределенным числом циклов). Блок операторов повторяется, пока условие верно, или до тех пор, пока условие не станет верным. Синтаксис:
DO DO {WHILE | UNTIL} <условие>
<блок операторов> <блок операторов>
LOOP {WHILE | UNTIL} условие LOOP
Где <условие> - числовое выражение, которое BASIC оценивает как «истина» (1) или «ложь» (0).
Проверка в конце цикла – операторы будут выполнены хотя бы один раз. В этом основное различие двух форм записи. При этом WHILE – цикл продолжается пока условие – «истина»; UNTIL – цикл продолжается, пока условие «ложь».
Пример:
DO
INPUT “ВВЕДИТЕ ЗНАЧЕНИЕ Х<10”
INPUT X
LOOP UNTIL X<10
(Выполнять до тех пор, пока не выполнится условие)
INPUT
X
DO
PRINT X
X=X-1
LOOP WHILE X >10
(Выполнять до тех пор, пока истинно условие)
I
= 0
PRINT "Значение I в начале цикла равно "; I
DO WHILE I < 10
I = I + 1
LOOP
PRINT "Значение I в конце цикла равно "; I
(Выполнять до тех пор, пока истинно условие)
I
= 0
PRINT "Значение I в начале цикла равно "; I
DO LOOP WHILE I < 10
I = I + 1
LOOP
Print "Значение I в конце цикла равно "; I
(Выполнять до тех пор, пока не выполнится условие)
Оператор цикла без счетчика while …wend
Синтаксис:
WHILE условие
[блок операторов]
WEND
Пример:
INPUT X
WHILE X>10
SOUND 1000 X*99,10
Х=Х-1
WEND
SOUND X,Y – оператор выдающий звуковой сигнал, где
X – частота (в ГЦ),
Y – длительность в тактах (16.2 Т= 1 сек).
Цикл с предусловием DO...LOOP предоставляет больше возможностей для организации цикла.
Операторы изменения хода выполнения программы
IF…THEN…ELSE
Синтаксис:
IF условие THEN <операторы 1> ELSE <операторы 2>
Если значение условия – истина (1), то выполняются <операторы 1>. Если значение условия – ложь (0), то выполняются <операторы 2> (если таковые имеются). Если <операторы 2> нет, то выполняется оператор следующей строки. <операторы 1> , так же, как и <операторы 2>, может быть более одного. При этом операторы разделяются двоеточием.
Если оператор IF…THEN…ELSE занимает более одной строки, то он должен заканчиваться ключевым словом END IF.
IF…THEN…ELSEIF…THEN…ELSE…END IF
Синтаксис:
IF <условие1> THEN
<блок операторов 1>
ELSEIF <условие2> THEN
<блок операторов 2>
...
ELSE
<блок операторов n>
END IF
<условие1> , <условие1> - любое выражение, которое может принимать значения «истина» (1) или «ложь» (0).
<Блоки операторов 1, 2, …, n> - один или несколько разделенных двоеточиями операторов в одной или нескольких строках.
За ELSE идут те операторы, которые требуется выполнить, если ни одно из условий не имеет значение «истина»
Пример:
INPUT "1 или 2? ", I
IF I = 1 OR I = 2 THEN
PRINT "OK"
ELSE
PRINT "Вне диапазона"
END IF