Разработка прикладной программы для решения систем линейных алгебраических уравнений
Курсовой проект - Компьютеры, программирование
Другие курсовые по предмету Компьютеры, программирование
nteger; var O: matr);LU(A: matr; n: integer; var L, U: matr; var norm: real);SLU(L, U: matr; n: integer; B: vect; var x: vect);Det(L, U: matr; n: integer; var d: real);LU(A: matr; n: integer; var L, U: matr; var norm: real); //нахождение //LU разложения, p, i, j, k: integer;: real; //норма строкиp := 1 to n do:= Abs(a[p, 1]);j := 1 to n donorm = N;j := 1 to N do[j, i] := X1[j];[j, i] := X2[j];;;i := 1 to n doj := 1 to n do[i, j] := 0;k := 1 to n do[i, j] := O[i, j] + O1[i, k] * O2[k, j];;;.