A.L=36
B.L=39
C.L=54
D.L=42
您可能感興趣的試卷
你可能感興趣的試題
A.2;2;2;3;3;3;4;4;4
B.2;3;4;2;3;4;2;3;4
C.3;3;3;3;3;3;3;3;3
D.4;3;2;4;3;2;4;3;2
A.0
B.24
C.120
D.144
A.8
B.32
C.128
D.16
A.8
B.4
C.7
D.10
A.12
B.20
C.24
D.不定值
最新試題
有程序:CHARACTER*4A,B*6A=‘ABCD’B=A∥‘EFGH’WRITE(*,*)BEND此程序執(zhí)行后的輸出結果為:()
有程序:DIMENSIONA(4,3)DATAA/3*-1.0,3*-2.0,3*-3.0,3*-4.0/S=0.0DO10K=1,4D=ABS(A(K,1))DO20J=2,3IF(ABS(A(K,J)).GT.D)D=ABS(A(K,J))20CONTINUES=S+D10CONTINUEWRITE(*,*)SEND此程序執(zhí)行后的結果為:()
有程序:F(C,D)=A*C+B/DA=1.0B=2.0WRITE(*,*)F(A,B)+F(B,A)END此程序的運行結果是:()
有程序:WRITE(*,400)876.345400FORMAT(1X,E8.0)此程序段的正確執(zhí)行結果是:()
有程序:CHARATERX*2,Y*3,Z*4DATAX,Y,Z/‘AB’,‘CDE’,‘FGHI’/WRITE(*,100)X,Y,Z100FORMAT(1X,A1,A2,A3)END此程序的運行結果是:()
有程序:N=0DOK=6,2,-2N=N+KM=2*N10CONTINUEWRITE(*,*)MEND上面程序的運行結果是:()
有程序:INTEGERM(5,5)L=0DO40J=1,5DO40K=1,5M(J,K)=K40CONTINUEDO10I=1,5N=1IF(MOD(I,2).EQ.0)N=2DO10J=N,5,2L=L+M(I,J)10CONTINUEWRITE(*,20)L20FORMAT(2X,‘L=’,I3)END此程序運行的結果為:()
有程序:INTEGERFF(X,Y)=X+YA=-2.0B=4.0B=1.0+F(A,B)WRITE(*,‘(1X,F(xiàn)3.1)’)BEND此程序的運行結果是:()
有程序:READ(*,50)SWRITE(*,100)S50FORMAT(1X,F(xiàn)7.3)100FORMAT(1X,F(xiàn)8.3)END執(zhí)行此程序,由鍵盤輸入123456789,則輸出S的值為:()
有程序:INTEGERM(3,4)DATAM/4*-1,4*-2,4*-3/S=0DO10I=1.310S=S+M(I,I+1)DO20I=4,2,-120S=S-M(I-1,I)WRITE(*,*)SEND上面程序的運行結果為:()