阅读下列FORTRAN程序： DIMENSION M(6) READ(，)M DO 10 J=l，6 DO 10 K=J,6 IF(M(K...

作者: rantiku 人气: - 评论: 0

问题阅读下列FORTRAN程序： DIMENSION M(6) READ(*，*)M DO 10 J=l，6 DO 10 K=J,6 IF(M(K)LTM(J))THEN N=M(K) M(K)=M(J) M(J)=N END IF 10 CONTINUE WRITE(*，100)(M(I)，I=1，6) 100 FORMAT(2X，614) END 键盘输入10，7，9，2，1，3;程序运行后的输出结果是:

选项 A. 1 2 3 7 9 10 B. 10 9 7 3 2 1 C. 7 9 2 1 3 10 D. 3 1 2 9 7 10

答案 A

解析数组赋值以后，各数组元素的值为： M(1)=10，M(2)=7，M(3)=9，M(4)=2，M(5)=1，M(6)=3。当循环一次后M(l)的值就确定下来了，因此不需要再做下去。答案:A

分享到：

猜你喜欢

发表评论

更多 网友评论 （0 条评论）

暂无评论

访问排行

页面耗时0.0282秒, 内存占用1.03 MB, Cache:redis,访问数据库19次

阅读下列FORTRAN程序： DIMENSION M(6) READ(，)M DO 10 J=l，6 DO 10 K=J,6 IF(M(K...

相关内容：FORTRAN,程序,DIMENSION

猜你喜欢

访问排行

联系我们

阅读下列FORTRAN程序： DIMENSION M(6) READ(*，*)M DO 10 J=l，6 DO 10 K=J,6 IF(M(K...

相关内容：FORTRAN,程序,DIMENSION

猜你喜欢

访问排行

联系我们

阅读下列FORTRAN程序： DIMENSION M(6) READ(，)M DO 10 J=l，6 DO 10 K=J,6 IF(M(K...