2.3. Схема алгоритма

Ввод

N

S=S*h

a=1 b=2

h = (b - a)/N

S=(F(a)+F(b))/2

i = 1, N-1,1

x = x + h

S = S + funk(x)

вывод

h, S

Рис. 2.1 Схема алгоритм программы

2.4. Текст программы

DECLARE FUNCTION funk! (z!)

REM ЧИСЛЕННОЕ ИНТЕГРИРОВАНИЕ ПО МЕТОДУ ТРАПЕЦИИ

CLS

PRINT " Численное интегрирование методом трапеции"

PRINT

PRINT " Л е м е ш к о А л е к с а н д р П е т р о в и ч ЭНФ - I-1"

PRINT : PRINT :

PRINT " Подынтегральная функция f(z)=(sqr(z)-1)^2 "

PRINT " на интервале [1 .. 2] "

PRINT

REM программное задание интервала

a = 1

b = 2

REM ввод данных

INPUT "число шагов - ", N

PRINT

REM вычисление величины шага

h = (b - a) / N

REM учёт первого и последнего члена

S = (funk(a) + funk(b)) / 2

REM нвчальное значеие x

x = a

REM основной цикл

FOR i = 1 TO N - 1

x = x + h

S = S + funk(x)

NEXT i

REM однократное умножение на h

S = h * S

REM вывод результата

PRINT

PRINT "h = "; USING "#.######"; h

PRINT

PRINT "РЕЗУЛЬТАТ = "; USING "###.######"; S

END

FUNCTION funk! (z!)

funk = (SQR(z) - 1) ^ 2

END FUNCTION

2.5. Результаты работы программы

Рис.2.3 Результаты работы программы

3. РЕШЕНИЕ СИСТЕМЫ ЛИНЕЙНЫХ АЛГЕБРАИЧЕСКИХ УРАВНЕНИЙ.

3.1. Формулировка задания

Реализовать программу на языке Q-Basic, которая производит вычисление корней системы линейных алгебраических уравнений (СЛАУ) методом Гаусса

Исходная система:

9x₁+ 3x₂+ 4x₃ = 8

x₁+ 8x₂+ 2x₃ = 34

6x₁+ 4x₂+ 12x₃ = 30

3.2. Алгоритм

Метод Гаусса является одним из самых распространенных методов решения систем линейных уравнений. Этот метод еще называют методом последовательного исключения неизвестных.

Рассмотрим базовый вариант метода Гаусса, называемый схемой единственного деления.

ПРЯМОЙ ХОД состоит из n - 1 шагов исключения.

1-й шаг. Целью этого шага является исключение неизвестного x₁ из уравнений с номерами i = 2, 3, …, n. Предположим, что коэффициент a₁₁ ( 0. Будем называть его главным элементом 1-го шага.

Найдем величины q_i1 = a_i1/a₁₁ (i = 2, 3, …, n), называемые множителями 1-го шага. Вычтем последовательно из второго, третьего, …, n-го уравнений системы первое уравнение, умноженное соответственно на q₂₁, q₃₁, …, q_n1. Это позволит обратить в нуль коэффициенты при x1 во всех уравнениях, кроме первого. В результате получим эквивалентную систему

a₁₁x₁ + a₁₂x₂ + a₁₃x₃ + … + a_1nx_n = b₁ ,

a₂₂⁽¹⁾x₂ + a₂₃⁽¹⁾x₃ + … + a_2n⁽¹⁾x_n = b₂⁽¹⁾ ,

a₃₂⁽¹⁾x₂ + a₃₃⁽¹⁾x₃ + … + a_3n⁽¹⁾x_n = b₃⁽¹⁾ ,

. . . . . . . .

a_n2⁽¹⁾x₂ + a_n3⁽¹⁾x₃ + … + a_nn⁽¹⁾x_n = b_n⁽¹⁾ .

в которой a_ij⁽¹⁾ и b_ij⁽¹⁾ вычисляются по формулам

a_ij⁽¹⁾ = a_ij - q_i1a_1j , b_i⁽¹⁾ = b_i - q_i1b₁.

2-й шаг. Целью этого шага является исключение неизвестного x₂ из уравнений с номерами i = 3, 4, …, n. Пусть a₂₂⁽¹⁾  0, где a₂₂⁽¹⁾ – коэффициент, называемый главным (или ведущим) элементом 2-го шага. Вычислим множители 2-го шага

q_i2 = a_i2⁽¹⁾ / a₂₂⁽¹⁾ (i = 3, 4, …, n)

и вычтем последовательно из третьего, четвертого, …, n-го уравнения системы второе уравнение, умноженное соответственно на q₃₂, q₄₂, …, q_n2. В результате получим систему

a₁₁x₁ + a₁₂x₂ + a₁₃x₃ + … + a₁n_xn = b₁ ,

a₂₂⁽¹⁾x₂ + a₂₃⁽¹⁾x₃ + … + a_2n⁽¹⁾ = b₂⁽¹⁾ ,

a₃₃⁽²⁾x₃ + … + a_3n⁽²⁾x_n = b₃⁽²⁾ ,

. . . . . . . . . . . . . . . . . .

. a_n3⁽²⁾x₃ + … + a_nn⁽²⁾x_n = b_n⁽²⁾ .

Здесь коэффициенты a_ij⁽²⁾ и b_ij⁽²⁾ вычисляются по формулам

a_ij⁽²⁾ = a_ij⁽¹⁾ – q_i2a_2j⁽¹⁾ , b_i⁽²⁾ = _bi⁽¹⁾ – q_i2b₂⁽¹⁾.

Аналогично проводятся остальные шаги. Опишем очередной k-й шаг.

k-й шаг. В предположении, что главный (ведущий) элемент k-го шага a_kk^(k–1) отличен от нуля, вычислим множители k-го шага

q_ik = a_ik^(k–1) / a_kk^(k–1) (i = k + 1, …, n)

и вычтем последовательно из (k + 1)-го, …, n-го уравнений полученной на предыдущем шаге системы k-e уравнение, умноженное соответственно на q_k+1,k, q_k+2,k, …, q_nk.

После (n - 1)-го шага исключения получим систему уравнений

a₁₁x₁ + a₁₂x₂ + a₁₃x₃ + … + a_1nx_n = b₁ ,

a₂₂⁽¹⁾x₂ + a₂₃⁽¹⁾x₃ + … + a_2n⁽¹⁾x_n = b₂⁽¹⁾ ,

a₃₃⁽²⁾x₃ + … + a_3n⁽²⁾x_n = b₃⁽²⁾ ,

. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .

a_nn^(n–1)x_n = b_n^(n–1) .

матрица A(n-1) которой является верхней треугольной. На этом вычисления прямого хода заканчиваются.

ОБРАТНЫЙ ХОД. Из последнего уравнения системы находим x_n. Подставляя найденное значение x_n в предпоследнее уравнение, получим x_n–1. Осуществляя обратную подстановку, далее последовательно находим x_n–1, x_n–2, …, x₁.

Вычисления неизвестных здесь проводятся по формулам

x_n = b_n(n–1) / a_nn(n–1),

x_k = (b_n(k–1) – a_k,k+1_(k–1)x_k+1 – … – a_kn(k–1)x_n) / a_k-1k-1, (k = n –1, …, 1).

Вычисление множителей, а также обратная подстановка требуют деления на главные элементы a_kk^(k–1). Поэтому если один из главных элементов оказывается равным нулю (или близким к нулю), то алгоритм не может быть реализован.