问题描述:
一个简单的FORTRAN程序,
IF(IDBG.GE.1)THEN
WRITE(MAXWRT_MAXBUF(1),9010) FT,DKA,DKR
CALL DMS_WRTTRM(1)
ENDIF
IF(IDBG.GE.1)THEN
WRITE(MAXWRT_MAXBUF(1),9010) FT,DKA,DKR
CALL DMS_WRTTRM(1)
ENDIF
问题解答:
我来补答展开全文阅读