问题
单项选择题
阅读下列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.15.0
B.12.0
C.18.0
D.24.0
答案
参考答案:A
阅读下列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.15.0
B.12.0
C.18.0
D.24.0
参考答案:A