网友您好, 请在下方输入框内输入要搜索的题目:
题目内容
(请给出正确答案)
单选题
阅读下列程序 READ(*,*)K WRITE(*,100)K 100 FORMAT(I5) END 程序运行时输入初始值12345,那么显示结果是()
A
2345
B
12345
C
****
D
*****
参考答案
参考解析
解析:
暂无解析
更多 “单选题阅读下列程序 READ(*,*)K WRITE(*,100)K 100 FORMAT(I5) END 程序运行时输入初始值12345,那么显示结果是()A 2345B 12345C ****D *****” 相关考题
考题
阅读下列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
考题
阅读以下FORTRAN程序:
INTEGER X(7)
DATA X/10,20,45,70,80,15,14/
M/X(l)
DO 10 1=2,7
IF(X(I).GIM)THEN
M=X(I)
K=1 END IF 10 CONTINUE
N=X(K)
X(K)=X(I)
X(I)=N
WRITE( *,100)(X(I),I=1,7)
100 FORMAT(2X,713)
END 程序运行的结果是:
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
考题
阅读FORTAN程序:
READ(*,*)NDO10K=1,NS=S+K**210CONTINUEWRITE(*,100)S100FORMAT(2X,F8.0)
END
键盘输入5则程序运行后的输出结果是:
A.35
B.45
C.65
D.55
考题
阅读以下FORTRAN程序:
READ( *,* )M
IF(M. LT. 100. AND. M. GT. 9f9?STOP
K=M/100
L=(M-K* 100)/10
N=M—K*100—L*10
MM=K+N
WRITEO,(2X,I3))MM END
键盘输入600,则程序的输出结果是:
A. 8
B. 3
C. 7
D. 6
考题
阅读下列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
考题
阅读下列FORTRAN77程序:
INTEGER A(4,5)
DATA A/5*1,5*2,5*3,5*4/
M=0 DO 10 K=1,4
10 M=M+A(K,K+1)
WRITE(*,*)M
END
上述程序运行后,输出的M值为( )。A.8
B.9
C.10
D.11
考题
阅读FORTRAN程序:
READC*,*)I,J,K DO 10 N=l,2 I=I+J+K J=I+K+J K=I+J+K 10 CONTINUE
WRITE(*,20)I,J,K 20 FORMAT(2X,315)
END
键盘输入1,0,0则程序运行后的输出结果是:
A. 4 7 13
B.2 3 4
C. 1 1 2
D. 6 9 15
考题
阅读以下FORTAN程序:
K1=M(5)
K2 = M(K1)
K3=M(K1)+M(K2)
K4=M(K1+K2+K3)
WRITEC* ,100)K4 100 FORMAT(2X,K4=I3)
END
FUNCTION M(N)
M=N+1 RETURN END 程序的输出结果是:
A. K4=28
B. K4=27
C. K4=30
D. K4=29
考题
阅读下列FORTRAN程序:
INTEGER X(7)
DATA X/4,5,7,8,10,12,11/
DO 10 K=1,7
IF(MOD(X(K),2).NE.0)THEN
S=A+X(K)
N=N+1
END IF
10 CONTINUE
T=S/N
WRITE(*,20)S,T
20 FORMAT(2X,3F6,1)
END
程序运行后的输出结果是:
(A)12.0 7.7(B)47.0 6.7(C)34.0 8.5(D)57.0 11.4
考题
阅读以下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( *,*) M
IF (M. LT. 100. AND. M. GT. 999) STOP
K=M/100
L=(M - K*100)/10
N= M - K* 100 - L* 10
MM= K + N
WRITE( * ,,(2X,I3)')MM
END
键盘输入600,则程序的输出结果是:
A. 8 B. 3 C. 7 D. 6
考题
阅读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 程序:
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程序:
K1=M(5)
K2=M(K1)
K3=M(K1)+M(K2)
K4=M(K1+K2+K3)
WRITE(*,100)K4
100 FORMAT(2X;K4;I3)
END
FUNCTION M(N)
M=N+1
RETURN
END
程序输出结果是:
(A)K4=28(B)K4=27(C)K4=30(D)K4=29
考题
阅读下列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
考题
有程序:READ(*,50)SWRITE(*,100)S50FORMAT(1X,F7.3)100FORMAT(1X,F8.3)END执行此程序,由键盘输入123456789,则输出S的值为:()A、1234.576B、2345.678C、345.678D、*******
考题
有程序:READ(*,100)A100FORMAT(3x,F6.2)WRITE(*,200)A200FORMAT(1x,F8.2)END当执行此程序时,从键盘输入1234567890↙,则程序的运行结果是:()A、4567.89B、1234.56C、******D、1234.5
考题
单选题阅读下列程序 CHARACTER A*4,B*5,C*4 DATA A,B,C/’BIG’,’MIDDLE’,’SMALL’/ WRITE(*,20)A,B,C 20 FORMAT(1X,A2,A3,A4) END 程序运行结果是()A
BIGMIDDLEB
*********C
BIGMIDSMAD
BIMIDSMAL
考题
单选题阅读下列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
考题
单选题有程序:READ(*,50)SWRITE(*,100)S50FORMAT(1X,F7.3)100FORMAT(1X,F8.3)END执行此程序,由键盘输入123456789,则输出S的值为:()A
1234.576B
2345.678C
345.678D
*******
考题
单选题有程序:CHARATERX*2,Y*3,Z*4DATAX,Y,Z/‘AB’,‘CDE’,‘FGHI’/WRITE(*,100)X,Y,Z100FORMAT(1X,A1,A2,A3)END此程序的运行结果是:()A
ABCDEFB
ACDFGHC
******D
ABCDEFGHI
考题
单选题阅读下列程序 K(X,Y)=X/Y+X A=-2.0 B=4.0 B=1.0+K(A,B) WRITE(*,10)B 10 FORMAT(1X,F4.1) END 程序运行结果是()A
-1.0B
1.0C
2.0D
3.0
考题
单选题有程序:READ(*,100)A100FORMAT(3x,F6.2)WRITE(*,200)A200FORMAT(1x,F8.2)END当执行此程序时,从键盘输入1234567890↙,则程序的运行结果是:()A
4567.89B
1234.56C
******D
1234.5
考题
单选题阅读下列程序 DIMENSION M(3,3) DATA M/1,2,3,4,5,6,7,8,9/ WRITE(*,100)(M(3,J),J=1,3) 100 FORMAT(1X,3I2) END 程序运行结果是()A
2 5 8B
3 6 9C
4 5 6D
7 8 9
考题
单选题阅读下列程序 INTEGER A(100),G READ(*,*)N,(A(I),I=1,N) DO 10 I=1,N-1 G=I DO 20 J=I+1,N IF(A(J).LT.A(G))THEN G=J ENDIF 20 CONTINUE K=A(I) A(I)=A(G) A(G)=K 10 CONTINUE WRITE(*,’(1X,10I2)’)(A(I),I=1,N) END 程序运行时输入的初始值是3,6,9,8,则运行结果是()A
6 9 8B
8 9 6C
6 8 9D
9 8 6
考题
单选题阅读下列程序 N=0 DO 10 K=1,3 N =N+1 M=K*N 10 CONTINUE WRITE(*,’(1X,2I3)’)M,K END 程序运行结果是()A
9 4B
9 3C
12 4D
12 3(#^)
考题
单选题阅读下列程序 F=1.0 DO 20,J=3,7,2 DO 20,K=J-1,J 20 F =F*K WRITE(*,’(13,F8.1)’)J,F END 程序运行结果是()A
3 6.0B
5 120.0C
9 5040.0D
9362880.0
热门标签
最新试卷