阅读下列FORTRAN程序： INTEGER X(7) DATA X／4，5，7，8，10，12，11／ DO10K=1，7 IF(MOD(X(K)，2)NE．0)THEN S=S+X(K) N=N+1 END IF 10CONTINUE T=S／N WR

admin2017-08-07 19

问题阅读下列FORTRAN程序：
INTEGER X(7)
DATA X／4，5，7，8，10，12，11／
DO10K=1，7
IF(MOD(X(K)，2)NE．0)THEN
S=S+X(K)
N=N+1
END IF
10CONTINUE
T=S／N
WRITE(*，20)S，T
20FORMAT(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。

转载请注明原文地址:https://kaotiyun.com/show/kIef777K

本试题收录于：基础考试（上午）题库注册土木工程师（岩土）分类