主题:FORTRAN语言请教
FORTRAN语言
C PROGRAM TO COMPUTER EXP(X)
WSIT(6,5)
5 FORMAT(11,5X,'X',10X,'EPS',10X,
1 'TERM',10X,'SUM')
READ(5,10) X,EPS
10 FORMAT(2F10.4)
SUM=1
TERM=1
AN=0
20 AN=AN+1
TERM=TERM*X/AN
SUM=SUM+TERM
IF(ABS(TERM)-EPS) 30,20,20
30 WRITE(6,40) X,EPS,TERM,SUM
40 FORMAT(1,2(1X,F10.4),F16.7,F13.6)
STOP
END
==================================
我唔知道大家有没有学过fortran语言,不过本帅就真的没有真正学习过,而且身边的人都没有学过,为了做毕业论文,本帅才遇上它,听老师讲,用fortran解决物理上的数学问题很不错!掌握后可能好过C语言。本帅觉得几有趣,老实说,以上程序我完全不懂,如果有人识的话,希望指教一下!
C PROGRAM TO COMPUTER EXP(X)
WSIT(6,5)
5 FORMAT(11,5X,'X',10X,'EPS',10X,
1 'TERM',10X,'SUM')
READ(5,10) X,EPS
10 FORMAT(2F10.4)
SUM=1
TERM=1
AN=0
20 AN=AN+1
TERM=TERM*X/AN
SUM=SUM+TERM
IF(ABS(TERM)-EPS) 30,20,20
30 WRITE(6,40) X,EPS,TERM,SUM
40 FORMAT(1,2(1X,F10.4),F16.7,F13.6)
STOP
END
==================================
我唔知道大家有没有学过fortran语言,不过本帅就真的没有真正学习过,而且身边的人都没有学过,为了做毕业论文,本帅才遇上它,听老师讲,用fortran解决物理上的数学问题很不错!掌握后可能好过C语言。本帅觉得几有趣,老实说,以上程序我完全不懂,如果有人识的话,希望指教一下!