Таблица основных (глобальных) переменных приведена в таблице 2.
Таблица 2 – Глобальные переменные
| 
   Переменная  | 
  
   Тип  | 
  
   Описание  | 
 |
| 
   X_d  | 
  
   Array of real  | 
  
   Массив аргумента  | 
 |
| 
   Z_d  | 
  
   Array of real  | 
  
   Массив функции  | 
 |
| 
   Num_point  | 
  
   real  | 
  
   Количество точек  | 
 |
| 
   Xbeg  | 
  
   real  | 
  
   Начальное значение аргумента  | 
 |
| 
   XEnd  | 
  
   real  | 
  
   Конечное значение аргумента  | 
 |
| 
   Dx  | 
  
   real  | 
  
   Шаг дискретизации  | 
 |
| 
   F  | 
  
   text  | 
  
   Идентификатор файла  | 
 |
Блок-схема процедуры построения меню приведена на рис. 3.
Выбор пункта меню происходит следующим образом: на экран выводятся все пункты меню и затем первый пункт – инверсным цветом. Далее в программе идёт считывание нажатий клавиш. Если нажаты клавиши “вверх” или “вниз” происходит вывод текущего пункта меню на экран прямым цветом, затем рассчитывается новый текущий пункт меню в соответствии с нажатой клавишей, и затем выводится новый текущий пункт меню инверсным цветом. При нажатии клавиши “Enter” происходит вызов соответствующей подпрограммы в соответствии с приведенной на рис. 3 блок-схемой алгоритма.

Рис. 3 – Блок-схема алгоритма процедуры menu
Блок-схема процедуры ввода входных данных приведена на рис. 4.

Рис. 4 – Блок-схема алгоритма процедуры ввода входных данных
В процедуре производится ввод основных входных параметров, таких как:
· XBeg - Начальное значение X
· XEnd - Конечное значение X
· Num_point – Количество точек
В конце производится вызов процедуры fill_zxd, осуществляющей заполнение массива функции значениями.
Блок-схема процедуры вывода значений функции на экран приведена на рис. 5.

Рис. 5 – Блок-схема алгоритма процедуры вывода значений функции на экран
В процедуре производится вывод в цикле значений из массивов x_d и z_d, в которых хранятся соответственно значения аргумента и функции. Затем производится вывод начального и конечного значений X а также приращения dx.
Блок-схема процедуры вывода значений функции в файлы приведена на рис. 6.

Рис. 6 – Блок-схема алгоритма процедуры вывода значений функции в файлы
В процедуре производится вывод в цикле значений из массивов x_d и z_d, в которых хранятся соответственно значения аргумента и функции, в файл. Затем производится вывод начального и конечного значений X а также приращения dx.
Блок-схема процедуры вычисления статистических характеристик приведена на рис. 7.
Основные переменные, используемые в процедуре, приведены в таблице 3.

Рис. 7 – Блок-схема алгоритма процедуры вычисления статистических характеристик
Таблица 3 – Переменные процедуры comp_char
| 
   Переменная  | 
  
   Тип  | 
  
   Описание  | 
 |
| 
   Min_z  | 
  
   real  | 
  
   Минимальное значение функции  | 
 |
| 
   Max_z  | 
  
   real  | 
  
   Максимальное значение функции  | 
 |
| 
   M_x  | 
  
   real  | 
  
   Среднее значение аргумента  | 
 |
| 
   M_z  | 
  
   real  | 
  
   Среднее значение функции  | 
 |
| 
   D_x  | 
  
   real  | 
  
   Дисперсия аргумента  | 
 |
| 
   D_z  | 
  
   real  | 
  
   Дисперсия функции  | 
 |
| 
   S_x  | 
  
   real  | 
  
   Среднеквадратическое значение аргумента  | 
 |
| 
   S_z  | 
  
   real  | 
  
   Среднеквадратическое значение функции  | 
 |
В процедуре происходит поиск максимального и минимального элементов в массиве функции z_d. После этого рассчитываются статистические характеристики, такие как математическое ожидание аргумента, математическое ожидание функции, дисперсии и среднеквадратические отклонения аргумента и функции. Затем происходит вывод рассчитанных характеристик как на экран, так и в файл.
Блок-схема процедуры вычисления интеграла функции методом прямоугольников приведена на рис. 8.
Основные переменные, используемые в процедуре, приведены в таблице 4.
Таблица 4 – Переменные процедуры comp_int
| 
   Переменная  | 
  
   Тип  | 
  
   Описание  | 
 |
| 
   Int  | 
  
   real  | 
  
   Текущее значение вычисляемого интеграла  | 
 |
| 
   Old_int  | 
  
   real  | 
  
   Предыдущее значение вычисляемого интеграла  | 
 |
| 
   a  | 
  
   real  | 
  
   Верхний предел интеграла  | 
 |
| 
   b  | 
  
   real  | 
  
   Нижний предел интеграла  | 
 |
| 
   e  | 
  
   real  | 
  
   Точность интегрирования  | 
 |
| 
   Num_p  | 
  
   real  | 
  
   Текущее количество точек  | 
 |
| 
   ddx  | 
  
   real  | 
  
   Текущее приращение  | 
 |
| 
   x  | 
  
   real  | 
  
   Текущий аргумент  | 
 |

Рис. 8 – Блок-схема алгоритма процедуры вычисления интеграла функции методом прямоугольников
Изначально берется количество точек, равное 50. В соответствии с этим, заданным методом вычисляется интеграл. Затем количество точек удваивается и снова вычисляется интеграл. Процесс повторяется до тех пор, пока не будет достигнута заданная точность.
Блок-схема процедуры заполнения массива функции приведена на рис. 9.

Рис. 9 – Блок-схема алгоритма процедуры заполнения массива функции
Уважаемый посетитель!
Чтобы распечатать файл, скачайте его (в формате Word).
Ссылка на скачивание - внизу страницы.