4.1.2. Оператор if-then-else-условный оператор
Оператор IF…THEN…ELSE представляет собой простейшую, но и самую распространенную форму проверки условий в Бейсике. Этот оператор имеет следующий синтаксис:
Оператор IF-THEN-ELSE (если-то-иначе) обеспечивает принятие двоичного решения.
Формат оператора IF
IF условие1 THEN
[блок операторов 1]
[ELSEIF условие2 THEN
[блок операторов 2] ]
[ELSE
[блок операторов n]]
END IF
где
условие1 - Любое выражение Бейсика, которое может быть оценено,
условие2 - как истинное(не ноль) или ложное(ноль)
блок операторов 1 один или несколько операторов в одной
блок операторов n или нескольких строках
Другой формат оператора IF:
IF условие THEN операторы 1 [ELSE операторы 2]
где
условие Любое выражение Бейсика, которое может быть оценено, как истинное (не ноль) или ложное (ноль)
операторы Один или несколько операторов, разделенных двоеточием.
Пример
1. Вычислить
INPUT "Введите Х,А->";X, A
IF X > 0 AND A <= 0 THEN
Y = LOG(X-A)/LOG(10)
ELSE
Y = A * EXP(X)
END IF
PRINT "Y="; Y
END
Пример
2. Вычислить
INPUT "Введите Х, В->"; X, B
Y = 0
IF X > 0 AND X < 4 AND B > 0 THEN
Y = X * B ^ (3 / 2)
ELSEIF X >= 4 AND B = 1 THEN
Y = B * SIN(X)
END IF
PRINT "Y="; Y
END
Пример
3. Вычислить
INPUT "Введите А->";A
X = A ^ 2 - 4 * A + 2
IF X > 2 THEN
Y = X ^ 2 + X + LOG(X) + EXP(-X)
ELSEIF X = 2 THEN
Y = X ^ 3 + SIN(X)
ELSE
Y = X ^ 2 + ABS(X)
END IF
PRINT "Y= "; Y
END
4.1.3. Оператор select case
Выполняет один из нескольких блоков операторов в зависимости от значения выражения.
Формат записи:
SELECT CASE выражение
CASE список выражений1
[блок операторов-1]
[CASE список выражений2
[блок операторов-2]]...
[CASE ELSE
[блок_операторов-n]]
END SELECT
где
выражение любое числовое или строковое выражение.
список_выражений1 одно или несколько выражений для сравнения с
список_выражений2 выражением.
В выражении ключевое слово IS должно стоять перед любым знаком отношения.
блок_операторов-1 один или несколько операторов в одной или
блок_операторов-2 нескольких строках.
блок_операторов-n
Аргументы списка выражений могут принимать любую из следующих форм или их комбинацию и должны разделяться запятыми:
выражение[,выражение]...
выражение ТО выражение
IS оператор_отношения выражение
где
выражение любое числовое или строковое выражение.
оператор_отношения один из следующих знаков отношения: <, <=, >, >=, <>, =.
Пример 1:
INPUT "Введите уровень риска (1-5): ", Total
SELECT CASE Total
CASE IS >= 5
PRINT "Максимальный риск, шансов на возвращение практически нет."
PRINT "Сходите в нотариальную контору."
CASE 2 ТО 4
PRINT "Высокий риск, шансов на возвращение немного."
PRINT "Проверьте снаряжение и припасы."
CASE 1
PRINT "Риск отсутствует, возврат гарантирован."
PRINT "В Вас отсутствует дух авантюризма."
END SELECT
Пример
2:
Вычислить
INPUT "x->,y->,z->"; x, y, z
f = x * y
SELECT CASE 0
CASE IS <> x > z
f = 3 ^ (-y) * SQR(ABS(x) + ABS(y))
CASE IS <> x <= z AND y > 0 AND y <> 1
f = 2 * (z ^ 4) * 1 / LOG(y)
END SELECT
PRINT "f="; f