Использование современной компьютерной техники и программного обеспечения для решения прикладных задач в области обогащения полезных ископаемых, страница 8

CALL gauss(a(), b(), n, x())

            Алгоритм подпрограммы показан на рисунке 7. Текст подпрограммы приведён в пункте 1.5.

Шаги 4 - 5 блок-схемы (см. рисунок 5) в расшифровке и комментариях не нуждаются.

Рис. 7. Алгоритм подпрограммы метода Гаусса

4.  Программирование.

В этот подраздел  входит описание используемых переменных, массивов и подпрограмм, файловый ввод-вывод данных, пояснение к циклам и ветвлениям, соответствие между блок-схемой и программой.

4.1.  Описание используемых переменных, массивов и подпрограмм.

Содержащиеся программе переменные и массивы можно разделить три типа:

1. Исходные данные:

a() – это массив, содержащий коэффициенты при неизвестных

b() – это массив, содержащий столбец свободных членов

alfa() – это массив, содержащий заданные содержания полезного компонента

Их описание в программе имеет вид:

DIM alfa(5)  AS SINGLE, a(4, 4) AS SINGLE, b(4) AS SINGLE

2. Результаты:

x() – это массив, содержащий расчетные долевые выходы продуктов

            Его описание в программе имеет вид:

DIM x(4) AS SINGLE

3. Вспомогательные переменные:

i, k, n, n1, m, j, j1, s - не несут смысловой нагрузки, но необходимы для корректной работы программы.

            Их описание в программе имеет вид:

DIM i AS INTEGER, k AS INTEGER, n AS INTEGER, n1 AS INTEGER, m AS SINGLE

DIM j AS INTEGER, j1 AS INTEGER, s AS SINGLE

Для вычисления матрицы методом Гаусса используется подпрограмма gauss с условными параметрами:

a() – матрица А, b() – столбец свободных членов, n – ранг матрицы, x() – массив неизвестных.

Для большей наглядности составлена сводная таблица 4.

Таблица 4.

Сводная таблица.

Идентификатор	Тип	Примечания
Alfa(5)	Single	Массив
A(4, 4)	Single	Массив
b(4)	Single	Массив
x(4)	Single	Массив
I	Integer	Переменная
K	Integer	Переменная
N	Integer	Переменная
N1	Integer	Переменная
M	Single	Переменная
J	Integer	Переменная
J1	Integer	Переменная
S	Single	Переменная
Gauss	-	Подпрограмма