Паскаль, Детальна інформація

for j: = 1 to i do write 1n (‘a[‘, j, ‘]=], a[j]: 6: 2);

Zna: = Itg (2, 5.6, 36, Fun);

write 1n (‘Zna’, Zna: 6 : 2);

write 1n (‘F(3, 5) = ‘, F(3, 5) :6:2);

r: - 0.2; g: = v;

repeat

1: - F(g);

write (g : 8 : 2, 1:8:2);

g: = g + r;

until g>u;

End.

5. Опис складених підпрограм.

5.1. Опис основної програми.

На початку програми ми вводимо масив значень х і у. Потім за допомогою стандартної підпрограми методом найменших квадратів знаходимо коефіцієнти а0, а1, а2, а3. Після цього знаходимо інтеграл за допомогою підпрограм і виводимо значення інтегралу. Потім знаходимо і виводимо значення функції у якщо ч = 3,5. У кінці програми ми протабульовуємо функцію у від 1,4 до 8 з кроком 0,2 і результати виводимо у вигляді таблиці.

5.2. Опис розроблених підпрограм.

5.2.1. Підпрограма F в якій змінні F присвоюється функція a[0] + a[1] x x + a[2] x Sgr(x) + a[3] x Exp (3 x ln(x))

5.2.2. Підпрограма Fun в якій змінній Fun присвоюється функція F(х) / Ехр(х) – 1,2.

5.2.3. Підпрограма Itg. На початку підпрограми змінній t присвоюється 0, а змінні Р значення змінної А тобто нижньої межі інтегрування. Потім змінній t присвоюється сума інтергалів де х змінюється від другого до передостаннього кроків інтегрування. І в кінці підпрограми змінній Itg присвоюється значення виразу.

6. Роздрук результатів розрахунку.

6.1. Роздрук результатів тестування.

Результат текстового обчислення значення інтегралу дорівнює 2, 67 і значенням функції у при х = 3,5 дорівнює 24.31

Висновок: в результаті проведеного тестування встановлено, що отримані результати відповідають результатам, які видає програма.

6.2. Роздрук результатів розрахунку

а[1] = -1.88

a[22] = 6.44

a[3] = -1.12

a[4] = 0.08

Zna = 2.67

F(3,5) = 24.31

1,4 6,91 4,6 18,67