Описание алгоритма

Алгоритм Sum. Вход: функция f, отрезок [a,b], количество разбиений n. Выход: приближенное значение интеграла, замененное интегральной суммой .

А. Начать исполнение.

1. Рассчитать .

2. Записать в результат значение 0.

3. Для значений i от 0 до n-1 повторять:

А. Увеличить результат на .

4. Конец цикла.

Б. Закончить исполнение.

 

Алгоритм Integr. Вход: функция f, отрезок [a,b], точность результата δ. Выход: значение интеграла с точностью.

А. Начать исполнение.

1. Присвоить n значение 8.

2. Записать в результат (переменную Result) приближенное значение интеграла функции f на отрезке [a,b] с разбиением на n частей.

3. Повторять:

А. Записать результат в переменную P.

Б. Удвоить n.

В. Записать в результат приближенное значение интеграла функции f на отрезке [a,b] с разбиением на n частей (подпрограмма Sum).

4. Конец цикла при условии |Result-P|<δ (т.е. результат по сравнению с предыдущим изменился менее чем на заданную точность).

Б. Закончить исполнение.

 

Алгоритм PrintIntegr. Вход: функция для интегрирования f и (необязательно) ее первообразная G.

А. Начать исполнение.

1. Повторять:

А. Вывести сообщение "Введите отрезок интегрирования [a,b]".

Б. Ввести a,b.

В. Вывести "Приближенное значение интеграла равно", Integr(f,a,b,10^-6), "±0.000001".

Г. Если известна первообразная, то вывести "Точное значение интеграла равно", G(b)-G(a).

Д. Вывести сообщение "Продолжить вычисление (Y/N) ?".

Е. Ввести символ ot.

2. Конец цикла при условии ot='N'.

Б. Закончить исполнение.

 

Алгоритм Lab4.

А. Начать исполнение.

1. Присвоить переменной Loop значение "истина".

2. Пока Loop имеет значение "истина", повторять:

А. Вывести на экран меню: "1 – Интегрирование функции
2 – Интегрирование функции
3 – Интегрирование функции
4 – Интегрирование функции
5 – Выход".

Б. Вывести сообщение "Выберите пункт меню".

В. Ввести n.

Г. Исследовать n:

1. Если n=1, то вызвать подпрограмму PrintIntegr для функции f1 с первообразной G1.

2. Если n=2, то вызвать подпрограмму PrintIntegr для функции f2 с первообразной G2.

3. Если n=3, то вызвать подпрограмму PrintIntegr для функции f3 без первообразной.

4. Если n=4, то вызвать подпрограмму PrintIntegr для функции f4 без первообразной.

5. Если n=5, то присвоить переменной Loop значение "ложь".

3. Конец цикла.

Б. Закончить исполнение.