网友您好, 请在下方输入框内输入要搜索的题目:
题目内容
(请给出正确答案)
阅读下列FORTRAN 程序:
DIMENSION M(6)
READ(*,*)M
DO 10 J=1,6
DO 10 K=J,6
IF(M(K).LT.M(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
DIMENSION M(6)
READ(*,*)M
DO 10 J=1,6
DO 10 K=J,6
IF(M(K).LT.M(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
参考答案
参考解析
解析:
更多 “阅读下列FORTRAN 程序: DIMENSION M(6) READ(*,*)M DO 10 J=1,6 DO 10 K=J,6 IF(M(K).LT.M(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” 相关考题
考题
阅读下列FORTRAN程序:
MOIUH=N(5)+NdO)
WRITE( *,‘(2X,15),)MQIUH END
FUNCTION N(K)
N=0
DOIO J=1,K N=N+J 10 CONTINUE RETURN END
程序运行后的结果是:
A. 65
B. 85
C. 90
D. 70
考题
阅读以下FORTRAN程序:
程序运行的结果是:
(A)10 20 45 70 80 15 14
(B)14 20 45 70 80 15 10
(C)80 20 45 70 10 15 14
(D)20 45 70 80 15 14 10
考题
阅读以下FORTRAN程序
READ(*,*)M,N
K=MOD(M,N)
10 IF(K.GT.0)THEN
M=N
N=K
K=MOD(M,N)
GOTO 10
END IF
WRITE(*,*)N
END
若运行以上程序时,由键盘输入25,11,则程序输出为( )。A.3
B.2
C.1
D.0
考题
阅读FORTRAN程序:
READ(*,*)N
DO 10 K-1,N
S=S+K**2
10 CONTINUE
WRITE(*,100)S
100 FORMAT(2X,F8,0)
END
键盘输入5则程序运行的输出结果是:
(A)35
(B)45
(C)65
(D)55
考题
阅读下列FORTRAN 程序:
MQIUH=N(5)+N(10)
WRITE(*,’(2X,15)’)MQIUH
END
FUNCTION N(K)
N=0
DO 10 J=1,k
N=N+J
10 CONTINUE
RETURN
END
程序运行后的结果是:
(A)65 (B)85
(C)90 (D)70
考题
阅读下列FORTRAN77程序:
INTEGER A(3,3)
DATA A/1,2,3,4,5,6,7,8,9/
S=0.0
DO 10 I=1,3
J=MOD(I,3)+1
S=S+A(I,J)
10 CONTINUE
WRITE(*,*)S
END
上述程序运行后,输出的S值为( )。A.150
B.120
C.180
D.240
考题
阅读FORTRAN程序:
OPEN(8,FILE=FILE2 DAT,STATUS=NEW)
DO 10 I=1,3
WEITE(8,(4I4)JI+I,J=1,4)
10 CONTINUE
CLOSE(8)
END
程序运行后,数据文件FILE2,DAT的内容是:
考题
阅读下列FORTRAN77程序:
READ(* , *)X
IF(X.LE.0) THEN
Y=0.0
ELSE IF ((X.LT.5.0).AND.(X.NE.2.0)) THEN
Y= 1/X
ELSE IF (X.LE.10.0) THEN
Y=1/(X+2)
ELSE
Y = 10.0
END IF
WRITE(* , *)Y
END
上述程序运行时,由键盘输入2,则输出的结果为()。
A.0.5
B.0.25
C.10.0
D.0.0
考题
下面叙述中正确的是?()A、在FORTRAN程序中,各类语句的位置是任意的B、在FORTRAN程序中的任何一个语句在程序执行时,机器都会产生操作C、在FORTRAN程序中的每一行上,都有标号D、在FORTRAN程序中,所有可执行语句在程序执行时,机器都会产生操作
考题
单选题下列叙述中不正确的是()A
FORTRAN子程序可以单独编译B
对一个FORTRAN源程序进行编译和连接无误后可生成可执行文件C
即使编译和连接都正确无误,FORTRAN程序运行时仍可能出错D
FORTRAN连接的主要任务是把函数库中的函数翻译成机器指令
考题
单选题阅读下列FORTRAN程序: CHARACTER*10 A, B*6 DO 10 I=1,10 A(I:I)=' ' 10 COUNTINUE A(1:5)='ABCDE' B='FGHIJK' A(4:9)=B WRITE(*,100) A 100 FORMAT(1X,A) END 程序运行结果是()A
ABCDEFGHIJB
ABCDEGHIJKC
ABCFGHIJKD
BCDEFGHIJK
考题
单选题下面叙述中正确的是?()A
在FORTRAN程序中,各类语句的位置是任意的B
在FORTRAN程序中的任何一个语句在程序执行时,机器都会产生操作C
在FORTRAN程序中的每一行上,都有标号D
在FORTRAN程序中,所有可执行语句在程序执行时,机器都会产生操作
考题
单选题阅读下列FORTRAN程序: F=1.0 DO 20 K=3, 7, 3 DO 20 L=K-1, K 20 WRTTE(*,’(I3, F8.1)’K, F*K END 程序运行结果的最后一行是()A
3 6.0B
6 6.0C
6 180.0D
7 180.0
考题
单选题阅读下列FORTRAN程序: DO I=4,2,-1 A=1.0 DO J=I,4,2 A=A+1.0 ENDDO ENDDO WRITE(*,*)A END 运行上述程序后,输出的A值为 ()A
5.0B
4.0C
3.0D
2.0
考题
单选题阅读下列FORTRAN程序: PI=3.14159265 WRITE(*,’(F7.4) ’)PI END 程序运行后输出结果是()A
3.142B
3.1415C
0.31416D
3.1416
热门标签
最新试卷