Краткая форма оператора.

Допускается опускать служебное слово ELSE. Оператор в этом случае выглядит следующем образом

IF <условие> THEN <оператор1>;

Как работает эта конструкция?

Запишем конструкцию оператора еще раз:

IF <условие> THEN <оператор1>;

<оператор2>;

<оператор3>;

...

Возможны два варианта:

1. условие истинно, в этом случае программа «уходит в сторону» на оператор 1, он выполняется, а затем продолжает выполнять последовательности операторов: оператор 2, оператор 3 и т. д.

2. условие ложно, оператор 1 НЕ выполняется, следовательно, сразу выполняется следующий по порядку оператор: оператор 2, затем оператор 3 и т. д.

Пример.

Вычислить значение функции, в зависимости от значения аргумента x

Решение этой задачи можно записать следующим образом:

IF x<0 THEN

y=x;

IF x=0 THEN

y=0;

IF x<0 THEN

y=-x*х;

Решая всевозможные задачи, можно убедиться, что очень часто необходимо выполнять группу операторов либо за словом «then» (т.е. по истинности условия), либо за словом else (при ложности условия), либо и в том и другом случае.

Для того чтобы записать группу действий необходимо использовать составной оператор begin end (операторные скобки).

1)

IF <условие> THEN BEGIN

оператор 1;

оператор 2;

...

оператор n;

END

ELSE

оператор;

2)

IF <условие> THEN оператор

ELSE BEGIN

оператор 1;

оператор 2;

...

оператор n;

END;

3)

IF <условие> THEN BEGIN

оператор 1;

оператор 2;

...

оператор n;

END

ELSE BEGIN

оператор 1;

оператор 2;

...

оператор n;

END;

Обратите внимание на синтаксис: между словами BEGIN и END стоят операторы, следуя правилу языка Турбо Паскаль, они отделены точкой с запятой.

Перед словом ELSE точки с запятой не может быть, это один оператор, состоящий из слов IF...THEN...ELSE.