FORTRAN语言中 循环语句DO如何完成阶乘
S=0.0DO10I=1,100T=1.0READ(*,*)NIF(N.GT.0)THENDO20K=1,N20T=T*KELSET=NENDIF10S=S+TWRITE...
S=0.0
DO 10 I=1,100
T=1.0
READ(*,*)N
IF(N.GT.0)THEN
DO 20 K=1,N
20 T=T*K
ELSE
T=N
END IF
10 S=S+T
WRITE(*,*)S
END
请好人解释， 我不知道那个N是什么东西，是自己取的吗？还有就是怎么阶乘啊这个？阶乘是从1到100吗？求详细解释+过程。 展开
DO 10 I=1,100
T=1.0
READ(*,*)N
IF(N.GT.0)THEN
DO 20 K=1,N
20 T=T*K
ELSE
T=N
END IF
10 S=S+T
WRITE(*,*)S
END
请好人解释， 我不知道那个N是什么东西，是自己取的吗？还有就是怎么阶乘啊这个？阶乘是从1到100吗？求详细解释+过程。 展开
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
