题目内容:
阅读下列FORTRAN程序:
INTEGER X(7)
DATA X/4,5,7,8,10,12,11/
DO 10 K=1,7
IF(MOD(X(K),2).NE.0)THEN
S=A+X(K)
N=N+1
END IF
10 CONTINUE
T=S/N
WRITE(*,20)S,T
20 FORMAT(2X,3F6,1)
END
程序运行后的输出结果是:
A.12.0 7.7
B.47.0 6.7
C.34.0 8.5
D.57.0 11.4
参考答案:
阅读下列FORTRAN程序:
INTEGER X(7)
DATA X/4,5,7,8,10,12,11/
DO 10 K=1,7
IF(MOD(X(K),2).NE.0)THEN
S=A+X(K)
N=N+1
END IF
10 CONTINUE
T=S/N
WRITE(*,20)S,T
20 FORMAT(2X,3F6,1)
END
程序运行后的输出结果是:
A.12.0 7.7
B.47.0 6.7
C.34.0 8.5
D.57.0 11.4