Оператор условия предназначен для выбора действия в зависимости от заданного условия. Общая форма условия выглядит следующим образом:
if <условие> then <действие если условие истинно> else <действие если условие ложно>;
После ключевого слова if указывается условие от котрого будет зависить то или иное действие. После then указывается оператор который выполниться только в том случае, если условие будет истино. После else, оператор который выполнится только в том случае, если условие будет ложным.
Так же можно указать и краткую форму записи условия. В этом случае, если условие оказывается ложным, то никаких действий не выполняется, а работа переходит к следующему оператору.
if <условие> then <действие если условие истинно>;
Пример использования условия для нахождения меньшего из двух переменных a и b.
if a < b then min := a else min := b;
В качестве условий можно указывать: = - равно; > - больше; < - меньше; >= - больше или равно; <= - меньше или равно; <> - не равно.
Если в качестве выполняемого действия необходимо указать несколько операторов, то их необходимо взять в операторные скобки begin .. end;.
if a < b then begin min := a; max := b; end else begin min := b; max := a; end;
Так же в качестве задания условия можно использовать вычисления. При этом выражение будет вычислено и проверено на истинность или ложность.
if a mod 2 = 0 then a := a + 1;
В качестве условий можно задавать и логические конструкции объединяя простые условия словами and, or, not, xor. В таком случае, простые условия должны быть взяты в скобки.
if (a < b) and (a < c) then min := a; if (b < a) and (b < c) then min := b;
Множественные условия
if a > 0 then Write('Положительное') else if a < 0 then Write('Отрицательное') else if a = 0 then Write('Ноль') else Write('Это не число!');