查看会员资料
用 户 名：j*****
发送消息- Email：用户隐藏
- Icq/MSN：
- 电话号码：
- Homepage：
- 会员简介：
最新会员发布资源
SUBROUTINE-Gauss
- SUBROUTINE Gauss_Expunction(A, B, X, N) IMPLICIT NONE ! 变量定义 INTEGER :: N REAL :: A(N,N), B(N) REAL :: X(N) INTEGER :: I, J REAL :: C LOGICAL, EXTERNAL :: Check_Root -SUBROUTINE Gauss_Expunction(A, B, X, N) IMPLICIT NONE ! 变量定义 INTEGER :: N REA