3.4. Программирование и отладка
Тексты программы и подпрограмм. Тексты программы и подпрограмм, составленные в соответствии с требованиями 2.1, приведены в приложении.
3.5. Испытание программы
Испытания программы проводятся на контрольных примерах. Первый контрольный пример содержит данные, приведенные в 3.1. Результаты выполнения программы на заданном наборе исходных данных должны совпадать с аналитическим решением, полученным в 3.1.
Второй контрольный пример предназначен для проверки работы программы в случае, когда среди заданных прямых нет параллельных.
Пример 1.
Содержимое файла исходных данных:
5
0.1
1.6 3.2 7.8
11.7 -3.9 1.5
-5.5 7.3 -9.2
4.8 9.6 4.1
-18.3 6.1 -13.4
Содержимое файла результатов:
И С Х О Д Н Ы Е Д А Н Н Ы Е
Количество прямых N = 5
Погрешность E = 1.000E-01
Проверка условия
|
A i B
j
- A j B
i |
< E
Нет
Запись номеров
параллельных
прямых
NomPr(K,1)=I1
NomPr(K,2)=I2
Вычисление
К=К+1 и R(K)
10
6
I2 = I2 + 1 0
Установка
начальных
значений
1
2
I2 = I1 + 1
Прямые
парал.
?
3
Да
4
5
Нет
Да
7
8
Нет
Да
9
I1
N-1
Конец POISK
Рис. 3.3
POISK
K = 0
I1 = 1
I2
N ?
I1 = I1 + 1
rab = Vec[1]
Nmax = 1
i = 2
Nmax 0 5 6 4 3 1
rab
Vec[i]
Nmax = 1
rab = Vec[i]
2
Нет
Да
i = i + 1
Нет
Да
Рис. 3.4
i Kol
Конец Nmax
Номер Коэффициенты прямой
прямой A B C
1 1.600 3.200 7.800
2 11.700 -3.900 1.500
3 -5.500 7.300 -9.200
4 4.800 9.600 4.100
5 -18.300 6.100 -13.400
Р Е З У Л Ь Т А Т Ы
Коэффициенты
прямых Расстояния
A B C
1.600 3.200 7.800 1.798
4.800 9.600 4.100
11.700 -3.900 1.500 0.573
-18.300 6.100 -13.400
Наибольшее расстояние: 1.798
между прямыми 1 и 4 с коэффициентами
A B C
1.600 3.200 7.800
4.800 9.600 4.100
Пример 2.
Содержимое файла исходных данных:
4
0.01
2.75 73.2 12.8
11.7 -3.9 1.5
-3.5 17.3 -9.2
-18.3 0.1 -13.4
Содержимое файла результатов:
И С Х О Д Н Ы Е Д А Н Н Ы Е
Количество прямых N = 4
Погрешность E = 1.000E-02
Коэффициенты прямых
A B C
2.750 73.200 12.800
11.700 -3.900 1.500
-3.500 17.300 -9.200
-18.300 0.100 -13.400
Параллельных прямых нет