阅读下列FORTRAN77程序: INTEGER A(3,3) DATA A/1,2,3,4,5,6,7,8,9/ S=0.0...

admin2020-12-24  23

问题 阅读下列FORTRAN77程序:
   INTEGER  A(3,3)
   DATA  A/1,2,3,4,5,6,7,8,9/
   S=0.0
   DO  10  I=1,3
   J=MOD(I,3)+1
   S=S+A(I,J)
   10  CONTINUE
   WRITE(*,*)S
   END
   上述程序运行后,输出的S值为(  )。

选项 A.150
B.120
C.180
D.240

答案A

解析A的值为,当Ⅰ=1时,J=MOD(1,3)+1=2,S=0+A(1,2)=4;当Ⅰ=2时,J=MOD(2,3)+1=3,S=4+A(2,3)-12;当I=3时,J=MOD(3,3)+1=1,S=12+A(3,1)=15
转载请注明原文地址:https://ti.zuoweng.com/ti/BoQCKKKQ
相关试题推荐