当前位置:首页
建筑知识
阅读下列FORTRAN程序: INTEGER X(7) DATAX/4,5, 7, 8, 10,12,11/DO 10K=1, 7IF(MOD(X(K),2).NE .0)THEN S=S+X(K)
阅读下列FORTRAN程序: INTEGER X(7) DATAX/4,5, 7, 8, 10,12,11/DO 10K=1, 7IF(MOD(X(K),2).NE .0)THEN S=S+X(K) N=N+1 END IF 10 ConTINUE T=S/N WRITE(*.20)S, T20 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】
此题为将读入的奇数相加,并除以奇数的个数。即5+7+11=23,23/3=7.7。