Реализация разветвяляющихся процессов с использованием оператора IF

Для реализации алгоритмов разветвляющейся структуры в Delphi предусмотрены две формы оператора IF: полная и сокращенная.

Полная форма оператора IF предназна для реализации разветвляющегося процесса, алгоритм которого в графическом виде можно описать так, как представлено на рис.1.

Синтаксическая конструкция полной формы оператора IF, соответсвующая алгоритму, представленному на рис.1.

 

IF Условие THEN

Оператор 1

ELSE

Оператор 2;

Следующий оператор

 

Рис.1. Схема алгоритм полного разветвляющегося процесса

 

Сокращенная форма оператора IF предназначена для реализации разветвляющегося процесса, алгоритм которого представлен на рис.2.

 

Рис.2. Схема алгоритма выполнения оператора IF в сокращенной форме

Синтаксическая конструкция сокращенной формы оператора IF:

IF Условие THEN

Оператор 1;

Следующий оператор

Согласно синтаксической конструкции опеартора IF, после ключевых слов, then и else, можно писать только один оператор. Если же вычислительный процесс требует выполнения нескольких операторов по ветви then и/или else, то эти операторы надо заключить в оператор begin …. End.

Синтаксическая конструкция оператора IF, когда в ветвях разветвления требуется выполнения нескольких операторов:

IF Условие THEN

Begin

Оператор

Оператор

∙∙∙∙∙∙∙∙∙∙∙∙∙∙∙∙∙∙∙;

Оператор

end

ELSE

Begin

Оператор

Оператор

∙∙∙∙∙∙∙∙∙∙∙∙∙∙∙∙∙∙∙;

Оператор

End;

Следующий оператор

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

Пример вложенной конструкции оператора IF.

IF Условие THEN

Begin

IF Условие THEN

Begin

Операторы

end

ELSE

Begin

Операторы

end;

Операторы

end

ELSE

Begin

Операторы

End;