题目内容

以下程序求两个整数M, N的最大公约数:SUBROUTINE ZDGUS (M,N)DO 10J=2,KIF (MOD (N, J) .EQ.0.AND.MOD (M, J) .EQ.0) L=J10 CONTINUEWRITE (*,’(2X,15) ') LRE TURNEND为了使程序完整,在____处应填入的是()

A. M
B. N
C. MIN(M,N)
D. M/N

查看答案
更多问题

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

阅读FORTRAN程序DIMENSI0N M(4, 3)DATE M/-10, 12, 24, 11, 20, -15, 61, 78, 93,30, 44, -45/ N(M(1,1)DO 10I=1,4DO 10J=1,3IF (M(I, J).LT.N) THENN=M(I, J)K1=IK2=JENDIF10 CONTINUEWRITE (*,’(2x,314)’)N,K1,K2程序运行后

A. 93,3, 1
B. -10, 1, 1
C. -45,4,3
D. 78,3,2

在Windows中, 文件系统目录的组织形式属于()

A. 关系型结构
B. 网络型结构
C. 树型结构
D. 真线型结构

已知顺序数据文件 FILE3.DAT有如下数据:50,54, 64,6565,70,85, 9046,73,60, 72阅读FORTRAN程序DIMENSION M(12)OPEN(10,FILE='FILE3.DAT')READ(10,*) (M(), 1=1, 12)DO 10J=1,12IF (M(J).GE.60) N=N+110 CONTINUE .WRITE(*,20) N20 FOR

A. N=7
B. N=8
C. N=4
D. N=9

答案查题题库