THEN BEGIN

Условный оператор.

Оператор перехода. Пустой оператор. Составной оператор.

Оператор безусловного перехода GOTO служит для прерывания естественного хода выполнения программы. Следующим выполняется оператор, помеченный меткой, которая использована в данном операторе перехода. Один оператор может помечаться несколькими метками.

GOTO метка ;

метка - это целое без знака или идентификатор, обязательно описанный в разделе описания меток (LABEL).

Для того, чтобы пометить оператор, перед ним ставится метка, после которой записывается двоеточие.

метка:оператор;

Оператор GOTO не рекомендуется использовать при программировании, так как это существенно усложняет отладку и тестирование программы, Доказано, что основных канонических структур (линейная последовательность операторов, разветвление, цикл) достаточно для реализации любого алгоритма.

Пустой оператор не обозначается и не вызывает никаких действий в программе, представляет собой дополнительную точку с запятой.

Составной оператор - группа операторов, заключённых в операторные скобки BEGINи END. Такая группа операторов рассматривается транслятором, как один оператор, Он может быть использован в любом месте программы, где должен быть простой оператор, но требуется выполнение группы операторов.

Условный оператор используется для программирования развилки, если условие сформулировано как логическое выражение.

IFлогическое выражение

THENоператор1

[ ELSEоператор 2] ;

следующий оператор программы;

Оператор выполняется таким образом: если результат вычисления логического выражения TRUE, то выполняется оператор 1, затем следующий оператор; если результат вычисления логического выражения – FALSE, то выполняется оператор 2, затем следующий оператор

. Операторы 1 и 2 могут быть простым или составным оператором. Если часть оператора, начинающаяся ELSE, отсутствует, то при логическом выражении равным FALSE, будет выполняться <следующий оператор>. При вложенности условных операторов ELSE всегда относится к ближайшему предшествующему IF. Следует избегать большой глубины вложенности условных операторов, так как при этом теряется наглядность и возможно появление ошибок.

Например,

…

IF A > 0

THEN P := P + 1

ELSE IF A < 0

THEN O := O + 1

ELSE N := N + 1 ;

…

…

IF A > 0

S := S+ A ;

K := K + 1