ش | ی | د | س | چ | پ | ج |
1 | 2 | 3 | ||||
4 | 5 | 6 | 7 | 8 | 9 | 10 |
11 | 12 | 13 | 14 | 15 | 16 | 17 |
18 | 19 | 20 | 21 | 22 | 23 | 24 |
25 | 26 | 27 | 28 | 29 | 30 |
کد فرترن روش ماتریس معکوس در حل دستگاه معادلات program
matrix_inverse_method implicit none INTEGER::i2,i,j,k,p,i1,j1,n,j2,i3
REAL::s,detr,deta
REAL,ALLOCATABLE::a(:,:),b(:,:),c(:,:),f(:),x(:,:),t(:,:),g(:,:) PRINT*
PRINT*," _ _ _ _ _ _ " PRINT*," | a11
a12 ..a1n1 | | x1 | ...
|
![]() |
![]() |