EMBED Equation.3
EMBED Equation.3
|
EMBED Equation.3
|
EMBED Equation.3
|
EMBED Equation.3
|
EMBED Equation.3
|
EMBED Equation.3
|
EMBED Equation.3
|
EMBED Equation.3
|
2
-0,4
1,6
1
|
4,2
3
-0,8
-2
|
1,6
-2
1
-1
|
-3
0
-1
1,5
|
1
0
0
0
|
0
1
0
0
|
0
0
1
0
|
0
0
0
1
|
5,8
1,6
1,8
2,5
|
1
|
2,1
|
0,8
|
-1,5
|
0,5
|
0
|
0
|
0
|
2,9
|
|
3,84
-4,16
-4,1
|
-1,68
-0,28
-1,8
|
-0,6
1,4
3
|
0,2
-0,8
-0,5
|
1
0
0
|
0
1
0
|
0
0
1
|
2,76
-2,84
-2,4
|
|
1
|
-0,43750
|
-0,15625
|
0,05208
|
0,26042
|
0
|
0
|
0,71875
|
|
|
-2,10000
-3,59375
|
0,75000
2,35937
|
-0,58335
-0,28647
|
1,08334
1,06772
|
1
0
|
0
1
|
0,14999
-3,52085
|
|
|
1
|
-0,35714
|
0,27779
|
-0,51588
|
-0,47619
|
0
|
0,07142
|
|
|
|
1,07590
|
0,71184
|
-0,78622
|
-1,71131
|
1
|
0,29022
|
|
|
|
|
0,66162
0,51408
0,38037
0,28239
|
-0,73076
-0,77686
-0,19364
-0,06801
|
-1,59058
-1,04425
-0,70539
-0,06915
|
0,92945
0,33195
0,29046
0,51865
|
-0,73027
-0,97508
-0,22820
0,66388
|
B) Gauss-Jordan usuli yordamida EMBED Equation.3 matritsaga teskari bo’lgan EMBED Equation.3 matritsa elementlarini hisoblash mumkin.
Teskari matritsa elementlarini hisoblash uchun EMBED Equation.3 matritsa birlik matritsa bilan kengaytiriladi, ya’ni
EMBED Equation.3
matritsa tuziladi. Bu matritsa ustida Gauss-Jordan almashtirishlari bajariladi. Natijada birlik matritsa o’rnida teskari matritsa hosil bo’ladi.
( EMBED Equation.3 matritsa maxsus bo’lmagan matritsa ya’ni determinanti noldan farqli bo’lishi kerak). Quyida teskari matritsani Gauss-Jordan usuli yordamida topish algoritmi va blok-sxemasi keltirilgan.
Detirminantni hisoblash algoritmining blok sxemasi.
10 REM "Determinantlarni hisoblash" 20 INPUT "n=", n 30 DIM d(n, n), b(n) 40 FOR i = 1 TO n: FOR j = 1 TO n 50 PRINT "d("; i; ","; j; ")="; 60 INPUT d(i, j): NEXT j, i 70 det = 1: ik = 1: FOR k = 1 TO n - 1 80 IF d(k, k) = 0 THEN 130 90 det = ik * det * d(k, k): ik = 1: FOR j = k + 1 TO n 100 b(j) = d(k, j) / d(k, k): NEXT j 110 FOR i = k + 1 TO n: FOR j = k + 1 TO n 120 d(i, j) = d(i, j) - b(j) * d(i, k): NEXT j, i: GOTO 180 130 FOR i = k + 1 TO n: IF d(i, k) = 0 THEN 170 140 L = i: ik = -ik: FOR j = k TO n 150 c = d(k, j): d(k, j) = d(L, j) 160 d(L, j) = c: NEXT j: GOTO 90 170 NEXT i: det = 0: GOTO 190 180 NEXT k: det = det * d(n, n) 190 PRINT "Determinantni qiymati="; det 200END Teskari matritsani topish algoritmining blok sxemasi
10 REM "TESKARI MATRITSA TOPISH"
20 INPUT "n=", N
30 DIM A(N, 2 * N)
40 FOR I = 1 TO N: FOR J = 1 TO N
50 PRINT "A("; I; ","; J; ")=";
60 INPUT A(I, J): NEXT J, I
70 N1 = N + 1: N2 = 2 * N
80 FOR I = 1 TO N: FOR J = N1 TO N2: IF J = N + I THEN 100
90 A(I, J) = 0: GOTO 110
100 A(I, J) = 1
110 NEXT J, I
120 FOR K = 1 TO N: IF A(K, K) = 0 THEN 190
130 P = A(K, K): FOR J = K TO N2
140 A(K, J) = A(K, J) / P: NEXT J
150 FOR I = 1 TO N: P = A(I, K): IF I = K THEN 180
160 FOR J = K TO N2
170 A(I, J) = A(I, J) - A(K, J) * P: NEXT J
180 NEXT I: GOTO 230
190 FOR I = K + 1 TO N: IF A(I, K) = 0 THEN 220
200 L = I: FOR J = K TO N2: C = A(K, J): A(K, J) = A(L, J)
210 A(L, J) = C: NEXT J: GOTO 130
220 NEXT I: GOTO 260
230 NEXT K
240 FOR I = 1 TO N: FOR J = N1 TO N2: L = J - N
250 PRINT "A("; I; ","; L; ")="; A(I, J): NEXT J, I: GOTO 270
260 PRINT "A-MAXSUS MATRITSA"
270 END
LABORATORIYA TOPSHIRIQLARI
1. A= EMBED Equation.3 , 2. A= EMBED Equation.3 , 3. A= EMBED Equation.3 , 4. A= EMBED Equation.3 , 5. A= EMBED Equation.3 , 6. A= EMBED Equation.3 , 7. A= EMBED Equation.3 , 8. A= EMBED Equation.3 , 9. A= EMBED Equation.3 ,10. A= EMBED Equation.3 ,
Do'stlaringiz bilan baham: |