Оператор SELECT CASE. Умовний оператор SELECT CASEне має обмежень, які мають оператор ON GOTO, і може замінити не тільки його
Умовний оператор SELECT CASE не має обмежень, які мають оператор ON…GOTO, і може замінити не тільки його, але й оператор IF…THEN. Оператор SELECT CASE перевіряє логічні умови і визначає оператор, який буде виконуватися наступним. Загальна форма оператора: SELECT CASE вираз CASE умова (оператори) ... CASE ELSE (оператори) END SELECT,
де вираз – будь-який числовий або текстовий вираз; умова – один або кілька логічних виразів, розділених комами; (оператори) – блок, який вміщує будь-яке число операторів; Якщо одна з умов CASE істинна, виконується відповідний блок операторів. Якщо жодне з них не виконується, управління передається CASE ELSE, або, якщо CASE ELSE немає, оператору, який стоїть після END SELECT.
Приклад 4. Визначити знак введеного числа.
REM Програма4 ‘Використання оператора SELECT CASE INPUT IS SELECT CASE IS CASE IS = 0 PRINT “Введене число = 0” CASE IS < 0 PRINT “Введене число – від’ємне” CASE IS > 0 PRINT “Введене число – додатне” END SELECT END Умовний вираз в блоках CASE може бути записано в вигляді:
CASE значення 1 ТО значення 2
В цьому форматі перевіряється, чи належить значення виразу відрізку [ значення 1, значення 2 ], якщо це так, то виконується відповідний блок операторів.
|
