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

问题 阅读下列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://jikaoti.com/ti/dkuhFFFM
0

最新回复(0)