当前位置:首页 建筑知识 阅读下列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)

发布时间:2023-03-03 07:12:48

阅读下列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程序运行后的输出结果是:

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

A 、23.0 7.7

B 、47.0 6.7

C 、34.0 8.5

D 、57.0 11.4

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

参考答案

【正确答案:A】

此题为将读入的奇数相加,并除以奇数的个数。即5+7+11=23,23/3=7.7。



温馨提示:
本文【阅读下列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) 】由作者 电气工程师考试 转载提供。 该文观点仅代表作者本人, 自学教育网 信息发布平台,仅提供信息存储空间服务, 若存在侵权问题,请及时联系管理员或作者进行删除。
(c)2008-2025 自学教育网 All Rights Reserved 汕头市灵创科技有限公司
粤ICP备2024240640号-6