* Данный текст распознан в автоматическом режиме, поэтому может содержать ошибки
184
Языки Бейсик
S E L E C T CASE-оператор
Выполняет один из нескольких блоков операторов в зависимости от значения выражения. Формат записи: SELECT CASE тест выражение CASE список выражений1 [блок операторов-1] [CASE список выражений2 [блок операторов-2]]... [CASE ELSE [блок операторов-n]] END SELECT де любое числовое или строковое выражение. тест_выражение список_выражений1 одно или несколько выражений для сравнения с список_выражений2 тест_выражением. В в ы р а ж е н и и к л ю ч е в о е с л о в о IS должно стоятьпередлюбым знаком отношения. блок_операторов-1 один или несколько операторов в одной или блок_операторов-2 нескольких строках. блок_операторов-п Аргументы списка выражений могут принимать любую из следующих форм или их комбинацию и должны разделяться запятыми: выражение[,выражение]... выражение TO выражение IS оператор_отношения выражение де выражение любое числовое или строковое выражение, совместимое с тест_выражением. оператор_отношенияодинизследующихзнаковотношения: <, <=, >, >=, < > , = .
Пример:
INPUT "Введите уровень риска ( 1 - 5 ) : ", T o t a l SELECT CASE T o t a l CASE I S >= 5 PRINT "Максимальный риск, шансов на возвращение практически нет." PRINT "Сходите в нотариальную контору." CASE2TO4 PRINT "Высокий риск, шансов на возвращение немного." PRINT "Проверьте снаряжение и припасы." CASE 1 PRINT "Риск отсутствует, возврат гарантирован." PRINT "В Вас отсутствует дух авантюризма." END SELECT
См. также IF...THEN...ELSE