单选题
阅读下列FORTRAN程序:
INTEGER X(7)
DATA X/4,5,7,8,10,12,11/
DO 10 K=1,7
IF(MOD(X(K),2)NE.0)THEN
S=S+X(K)
N=N+1
END IF
10 CoNTINUE
T=S/N
WRITE(*,20)S,T
20 FORMAT(2X,3F6.1)
END
程序运行后的输出结果是:
A.23.0 7.7
B.47.0 6.7
C.34.0 8.5
D.57.0 11.4
A
B
C
D
【正确答案】
A
【答案解析】
此题为将读入的奇数相加,并除以奇数的个数。即5+7+11=23,23/3=7.7。
提交答案
关闭