Программирование разветвляющихся процессов

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

Условный оператор имеет следующие формы записи:

1. if логическое выражение then оператор1 else оператор 2;
2. if логическое выражение then

begin группа операторов1 end
else
begin группа операторов2 end;

1. if логическое выражение then оператор;
2. if логическое выражение then

begin группа операторов end.

Если логическое выражение истинно, тогда выполняется опе­ратор1 или группа операторов1, иначе выполняется оператор 2, или группа операторов 2, или оператор if пропускается и выполняется следующий за ним оператор.

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

Программа

var

A, X, Y: real; Описание вещественных переменных

begin Начало программы

writeln ('Введите А, Х'); Вывод на экран фразы “Введите А,Х”

readl (А, X); Ввод значений переменных

if X>=A then

Y:= А + SQRT (X - А) Вычисление Y по первой формуле

else

Y:= LN (ABS (X+A)) +SIN(X)* SIN(X); Вычисление Y по второй формуле

writeln ('Y= ‘Y:1Q:2, ' X= ', X:5:2); ВыводY,X

end. Конец программы