问题
单项选择题
阅读下列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