阅读下列FORTAN程序: INTEGERX(7) DATAX/4,5,7,8,10,12,11/ DO10K=l,7 IF(MOD(X(K),2)N E.0)THENS=S+X(K) N=N+1ENDIF10CONTINUET=S/N WRITE(*,20)S,T20FORMAT(2X,3F6.1) END 程序运行后的输出结果是:

题目类型: 单选题

题目内容

阅读下列FORTAN程序: INTEGERX(7) DATAX/4,5,7,8,10,12,11/ DO10K=l,7 IF(MOD(X(K),2)N E.0)THENS=S+X(K) N=N+1ENDIF10CONTINUET=S/N WRITE(*,20)S,T20FORMAT(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

题目解析

此题为将读入的奇数相加,并除以奇数的个数。 答案:A

题目纠错