END select. Select CASE выражение_для_проверки

...

SELECT CASE выражение_для_проверки

END IF

ELSE

END IF

Операторы1

[ELSE

операторы2]

Здесь если логическое условие истинно, выполняются операторы группы 1, если нет – операторы группы 2. Присутствие фразы ELSE и следующей за ней группы операторов необязательно.

Для примера используем предыдущую задачу о сравнениичисел А и В.

IF a>b THEN

?”А больше В”

?”В больше А”

Замечание к нотации. Для придания более наглядного вида программе удобно использовать отступы при вводе “подчиненных” операторов в структурах IF, FOR и других, как показано выше. В данном случае подчиненными операторами по отношению к структуре IF являются операторы печати.

ОПЕРАТОР ВЫБОРА (селектор). Оператор выбора позволяет осуществлять удобный выбор среди нескольких возможных альтернатив.

Вид оператора:

[CASE список_выражений_1

операторы 1]

[CASE список_выражений_2

операторы2]

[CASE ELSE

операторы_N]

где: выражение для проверки – числовое или символьное выражение;

список выражений – одно или более выражений такого же типа, что и выражение для проверки.

Если выражение для проверки совпадает с каким-либо элементом из списка выражений, приведенного после ключевого слова CASE, товыполняется группа операторов, следующих за этим словом до следующего CASE или END SELECT. Затем осуществляется переход к оператору, идущему после END SELECT. Если нет ни одного совпадения, выполняются операторы, следующие после слова CASE ELSE (если есть).

Элементы списка выражений должны иметь одну из следующих форм:

выражение_1 [,выражение_2] – проверяется совпадение выражения для проверки с любым выражением из перечисленного списка.

выражение_1 TO выражение_2 – проверяется нахождение выра­жения для проверки в диапазоне от выражения 1 до выра­жения 2.

IS логическое_условие – проверяет истинность логического условия. Условие должно начинаться с одного из знаков отношений (<, >, <=, >=, <>, =).

Пример. Здесь проверяется, при­надлежит ли переменная Х подмножеству чисел 1,3,5,7, или оно находится в диапазоне от 10 до 20, или оно больше 100 с выдачей соответствующего сообщения. Если ни одно из условий не выполняется, выдается сообщение "Остальные числа". Решение ниже слева.

Допускается соединение списков выражений любого типа. Положим, что нам нужно выяснить только факт принадлежности/непринадлежности к указанному множеству. В этом случае решение задачи (ниже справа) упрощается.

SELECT CASE x CASE 1,3,5,7 ? "x=1, 3, 5, 7" CASE 10 TO 20 ? "10<=x<=20" CASE IS > 100 ? "x>100" CASE ELSE ?"Остальные числа" END SELECT

SELECT CASE x CASE 1,3,5,7,10 TO 20, IS > 100 ? "x=1,3,5,7 или 10<=x<=20 или х>100" CASE ELSE ? "Остальные числа" END SELECT

ОПЕРАТОР ЗАВЕРШЕНИЯ. Оператор END (“конец”) завершает выполнение программы. Он может находиться в любом месте программы. Таких операторов может быть несколько в случае, если предполагается завершение программы не только в ее конце. Присутствие END в конце программы необязательно, поскольку после выполнения последнего оператора, она все равно заканчивается.

КОММЕНТАРИИ. Написанная программа спустя некоторое время даже автору кажется малопонятным набором символов. Для облегчения понимания программы в нее вставляются комментарии – тексты, поясняющие суть процессов и не влияющие на ее исполнение. Такие тексты должны начинаться со слова-оператора

Дата добавления: 2014-12-27