阅读下列FORTRAN程序：DIMENSION M （6）READ（，）MDO 10J=1，6DO 10K=J，6IF（M （K） .LT.M （J））THENN=M（K）M（K）=M（J）M

由 考证宝 分享时间：2022-06-09 15:49:23 加入收藏

考试：

科目：（在线考试）

问题：

阅读下列FORTRAN程序：DIMENSION M （6）READ（*，*）MDO 10J=1，6DO 10K=J，6IF（M （K） .LT.M （J））THENN=M（K）M（K）=M（J）M（J）=NEND IF10 CONTINUEWRITE（*,100）（M（）,I=1,6）100 FORMAT（2X,614）END键盘输入10，7,9，2，1，3；程序运行后的输出结果是：
A：1237910
B：109732 1
C：7921310
D：31297 10

答案：

解析：

数组赋值以后，各数组元素的值为： M （1） =10， M （2） =9， M （3） =9,M （4） =2， M （5） =1, M （6） =3。当循环一次后M （1）的值就确定下来了，因此不需要再做下去。此时M （1） =1。

阅读下列FORTRAN程序：DIMENSION M （6）READ（，）MDO 10J=1，6DO 10K=J，6IF（M （K） .LT.M （J））THENN=M（K）M（K）=M（J）M

VIP会员可以免费下载题库

推荐度：

点击下载文档文档为doc格式

上一篇：阅读下列FORTRAN程序：MQIUH=N （5） +N （10）WRITE（*,’（2X, 15）’）MQIUHENDFUNCTION N （K）N=0DO 10 J=1,kN=N+J10 CONT

下一篇：以下程序求两个整数M, N的最大公约数：SUBROUTINE ZDGUS （M，N）DO 10J=2，KIF （MOD （N, J） .EQ.0.AND.MOD （M, J） .EQ.0） L=J10

阅读下列FORTRAN程序：DIMENSION M （6）READ（，）MDO 10J=1，6DO 10K=J，6IF（M （K） .LT.M （J））THENN=M（K）M（K）=M（J）M

考试：

科目：（在线考试）

问题：

答案：

解析：

相关标签：

阅读下列FORTRAN程序：DIMENSION M （6）READ（，）MDO 10J=1，6DO 10K=J，6IF（M （K） .LT.M （J））THENN=M（K）M（K）=M（J）M

同科目下试题

精选图文

热门排序

推荐文章

热门标签

相关文章列表

阅读 下列FORTRAN程序：DIMENSION M （6）READ（*，*）MDO 10J=1，6DO 10K=J，6IF（M （K） .LT.M （J） ）THENN=M（K）M（K）=M（J）M

考试：

科目：（在线考试）

问题：

答案：

解析：

相关标签：

阅读 下列FORTRAN程序：DIMENSION M （6）READ（*，*）MDO 10J=1，6DO 10K=J，6IF（M （K） .LT.M （J） ）THENN=M（K）M（K）=M（J）M

同科目下试题

精选图文

热门排序

推荐文章

热门标签

相关文章列表

阅读下列FORTRAN程序：DIMENSION M （6）READ（，）MDO 10J=1，6DO 10K=J，6IF（M （K） .LT.M （J））THENN=M（K）M（K）=M（J）M

阅读下列FORTRAN程序：DIMENSION M （6）READ（，）MDO 10J=1，6DO 10K=J，6IF（M （K） .LT.M （J））THENN=M（K）M（K）=M（J）M