阅读下列FORTRAN77程序: INTEGER A(3,3)

shuhaiku2019-12-17  27

问题 阅读下列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.150B.120C.180D.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/OM8sKKKQ