單項選擇題有程序:K=0DO10I=1,6,2DO10J=1,6,3IF(K.LT.I*J)K=I*J10CONTINUEWRITE(*,*)KEND此程序執(zhí)行后的輸出結(jié)果為:()

A.18
B.30
C.25
D.36


你可能感興趣的試題

3.單項選擇題對任意輸入的x,READ(*,*)xK=SIN(x)WRITE(*,*)KEND此程序執(zhí)行后K的值為:()

A.在區(qū)間[-1,1]中的一個值
B.一定等于0
C.在區(qū)間(-1,1)中的一個值
D.K=0或K=-1

4.單項選擇題若有語句:READ(8,REC=6,ERR=10)BWRITE(8,6)X,Y則關(guān)于它們的描述,其中哪一條描述是正確的()?

A.順序有格式讀,順序無格式寫
B.直接有格式讀,順序有格式寫
C.直接無格式讀,直接無格式寫
D.直接無格式讀,順序有格式寫

5.單項選擇題以下存在語法錯誤的OPEN語句是哪一條?()

A.OPEN(8)
B.OPEN(8,F(xiàn)ORM=‘UNFORMATTED’)
C.OPEN(8,ACCESS=‘DIRECT’)
D.OPEN(8,F(xiàn)ILE=‘AA’)

最新試題

有程序:DATAI,M,N/2,1,4/10M=M*II=I+1IF(I.GT.N)GOT020GOTO1020WRITE(*,*)MEND執(zhí)行此程序后,輸出結(jié)果為:()

題型:單項選擇題

有程序: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此程序運行的結(jié)果為:()

題型:單項選擇題

有程序:INTEGERPP=0DO10I=0,10,3DO10J=5,100,20DO10K=-10,-5,-110P=P+1WRITE(*,*)PEND此程序的運行結(jié)果是:()

題型:單項選擇題

有程序:CHARACTER*4A,B*6A=‘ABCD’B=A∥‘EFGH’WRITE(*,*)BEND此程序執(zhí)行后的輸出結(jié)果為:()

題型:單項選擇題

有程序:INTEGERFF(X,Y)=X+YA=-2.0B=4.0B=1.0+F(A,B)WRITE(*,‘(1X,F(xiàn)3.1)’)BEND此程序的運行結(jié)果是:()

題型:單項選擇題

有程序: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í)行后的結(jié)果為:()

題型:單項選擇題

有程序:INTEGERA(3)DATAA/3*1/N=2DO10I=1.NDO10J=1,N10A(I)=A(J)+1WRITE(*,*)A(N)END此程序的運行結(jié)果為:()

題型:單項選擇題

有程序:DO10I=1,5,3DO10J=I,310K=I+JWRITE(*,*)KEND此程序的運行結(jié)果是:()

題型:單項選擇題

有程序:DIMENSIONx(3,3)READ(*,*)xCALLSSl(x(1,2))ENDSUBROUTINESSl(x)DIMENSIONx(3)WRITE(*,*)x(2)END當輸入1、2、3、4、5、6、7、8、9時,此程序執(zhí)行后的輸出結(jié)果為:()

題型:單項選擇題

有程序:CHARACTER*6SS=‘ABCDEF’CALLSS(S)ENDSUBROUTINESS(S1)CHARACTERS1*3WRITE(*,*)S1END此程序執(zhí)行后的輸出結(jié)果為:()

題型:單項選擇題