Инструкция выбора

IF... THEN... ELSEIF... ELSE … END _IF

Синтаксис инструкции выбора:

IF <логическое выражение 1> THEN

<инструкция 1>;

< инструкция 2>;

…………….;

ELSEIF < логическое выражение 2>

< инструкция 3>;

< инструкция 4>;

…………….;

ELSE

< инструкция 5>;

< инструкция 6>;

…………….;

END_IF;

 

Порядок выполнения инструкции выбора:

если логическое выражение 1 равно лог. 1, то будут выполняться инструкции 1, 2, …;

если логическое выражение 1 равно лог. 0 и логическое выражение 2 равно лог. 1, то будут выполняться инструкции 3,4, …;

если логическое выражение 1 и логическое выражение 2 равны лог. 0, то будут выполняться инструкции 5,6, ….

END_IF идентифицирует конец инструкции выбора.

Примечания:

1. Утверждения ELSE_IF или (и) ELSE могут отсутствовать.

2. Количество вложенных инструкций IF... THEN... ELSIF... THEN... END_IF не ограничивается, но при этом усложняется анализ таких конструкций, что может привести к появлению ошибок.

Примеры реализации инструкций выбора:

IF A>B THEN (*Если A>B, то будут*)

C:=SIN_REAL(A) * COS_REAL(B); (*вычисляться значения*)

B:=C – А; (*переменных С и В*)

END_IF;

 

IF FLAG THEN (*Если переменная FLAG*)

C:=SIN_REAL(A) * COS_REAL(B); (*равна лог. 1, то будут*)

B:=C – A; (*вычисляться С и В,*)

ELSE (*иначе будут*)

D:=A + B; (*вычисляться D и Е *)

E:=C * A;

END_IF;

 

IF NOT FLAG THEN (*Если переменная FLAG*)

C:=SIN_REAL(A) * COS_REAL(B); (*равна лог. 0, то будут*)

B:=SUB_REAL(C,A); (*вычисляться С и В;*)

ELSIF M=N THEN (*если FLAG=1 и M=N, то*)

D:=ADD_REAL(A,B); (*будут вычисляться*)

E:=MUL_REAL(C,A); (*D и E *)

END_IF;

 

IF A>B THEN (*Если A>B, то будут*)

C:=SIN_REAL(A) * COS_REAL(B); (*вычисляться С и В*)

B:=SUB_REAL(C,A);

ELSIF M=N THEN (*если А≤В и M=N, то*)

D:=ADD_REAL(A,B); (*будут вычисляться*)

E:=MUL_REAL(C,A); (*D и E;*)

ELSE (*если А≤В и M≠N, то*)

F:=F+; (*будут вычисляться*)

G:=С/D; (*F и G*)

END_IF;