Оператор 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
|
