Задание. Вычислить функцию
 ,
где N – количество членов ряда.
Структура программы будет включать в себя два модуля – головную программу с именем Progect1 и модуль с именем Unit1, связанный с основной формой.
Реализуем подпрограмму вычисления факториала двумя способами – в виде функции и рекурсивным методом.
1. На рисунке 7.1 – разработка алгоритма:
– входные данные: x – вещественная переменная, являющаяся аргументом функции cos(n x); n – целочисленная переменная, обозначающая количество членов ряда;
– выходные данные: s – вещественная переменная, значение которой есть сумма членов ряда;
– промежуточные данные: k – целочисленная переменная, используемая как счетчик цикла; r – целочисленная переменная.
                                            
x, n
s = 0
i=1,n
s = 0
i = 1,n
s
FAKTfunc
r = k!
s+=cos(k*x)/ r
s
frec
r = k!
s+=cos(k*x)/ r
Рис. 7.1. Схема алгоритма основной программы
2. На рисунке 7.2 – функция FAKTfunk, которая вычисляет k!:
– входные данные: k – целочисленная переменная;
– выходные данные: r – целочисленная переменная, являющаяся значением k!;
– промежуточные данные: i – целочисленная переменная, используемая как счетчик цикла.
   Рис. 7.2. Схема алгоритма функции FAKTfunc
3. На рисунке 7.3 – функция frec, которая вычисляет k!:
– входные данные: k – целочисленная переменная;
– выходные данные: frec – имя функции вещественного типа;
– промежуточные данные: i – целочисленная переменная, используемая как счетчик цикла.
Рис. 7.3. Схема алгоритма функции frec
4. Разработка формы – таблица 7.1, рисунок 7.4.
//Пример удален, надо добавить
|
Скачать 227.5 Kb.