کد های درس محاسبات عددی به زبان فرترن (رایگان)

کد فرترن روش ماتریس معکوس در حل دستگاه معادلات 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 |   ...

کد فرترن روش ماتریس معکوس در حل دستگاه معادلات 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 |   ...