阅读下列FORTAN程序:
INTEGER X(7)
DATA X/4,5,7,8,10,12,11/
DO 10 K=l,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
程序运行后的输出结果是:

2023-06-04

A. 23.0 7.7
B. 47. 0 6.7
C. 34. 0 8.5
D. 57. 0 11.4


参考答案:A

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

相关推荐