考证宝(kaozhengbao.com)

阅读下列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。

相关标签:

基础知识     基础知识     下列     INTEGER     FORTRAN     程序    
221381
领取福利

微信扫码领取福利

微信扫码分享