2.2.2. Разветвляющийся вычислительный процесс

В разветвляющемся вычислительном процессе происходит выбор направления решения задачи, в зависимости от выполнения (или невыполнения) некоторого условия (рис. 2).

Пример. Вычислить и напечатать значение y при x 2,7 и x < 2,7; a = 2,1; b = 0,5.

	если
	если

Блок-схема алгоритма

PROGRAM ZOG; var x, a, b: real; begin writeln (‘ввести x, a, b’); readln (x, a, b); if x>=2.7 then y:=sqr(ln(x))+b else y:=(a*b*x)+x; writeln (‘y=’, y:5:2, ‘ x=’, x:4:1, ‘ a=’, a:4:1, ‘ b=’, b:4:1); end.

Рис. 2. Разветвляющийся алгоритм

Действия, которые должны быть выполнены машиной при реализации алгоритма, состоят в следующем:

блок 2 – ввод исходных данных;

блок 3 – проверка условия;

блок 4, 5 – вычисление у при выполнении (да) или невыполнении условия (нет);

блок 6 – вывод результата на дисплей;

блок 7 – конец расчета.

2.2.3. Циклический вычислительный процесс

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

Среди существующих разновидностей циклов следует выделить:

– цикл с заданным числом шагов;

– циклический разветвляющийся процесс (смешанный);

– итерационный цикл.

Цикл с заданным числом шагов

Пример. Вычислить и напечатать значения

1,1 x 2,1, шаг изменения x, h = 0,05.

Решение задачи состоит в вычислении и печати y для каждого значения x на отрезке от 1 до 2.

Вычисление значения y и печать x и y – многократно выполняемые действия, происходящие циклически (рис. 3).

Исходными данными будут: начальное значение x (x_нач), конечное значение x (х_кон) и шаг изменения h.

Блок-схема алгоритма

Подготовка цикла

Задание начального значения

Проверка условия окончания цикла

Выполнение многократно

повторяющихся операций:

вычисление по формуле;

вывод результата на дисплей;

изменения значения х на величину

шага h (подготовка к следующему

шагу цикла)

Рис. 3. Циклический алгоритм

Циклический расчет по формуле будет продолжаться до тех пор, пока выполняется условие в блоке 4:

блок 2 – ввод исходных данных;

блок 3 – задание начального значения x;

блок 4 – проверка условия окончания цикла;

блок 5 – вычисление значений y, при изменяющемся аргументе x;

блок 6 – печать значений x и y;

блок 7 – изменение значения аргумента x на величину шага – h и проверка условия окончания цикла;

Блок 8 – окончание расчета.

При составлении программы можно перейти к символам, принятым в Pascal.

Программа на языке Pascal

PROGRAM ALPA;

var x_n, x_k, h, y: real;

begin

writeln (‘ввести x_n, x_k, h’);

readln (x_n, x_k, h);

x:= x_n;

while x<= x_k do

begin

y:=sin(1/(cos(x)-(sin(x)/cos(x))));

writeln (‘y=’, y:5:2,‘ x=’, x:4:1);

x:=x+h;

end;

end.

В программе использованы операторы цикла «с предусловием»: WHILE (x<=x_k) DO….