單項(xiàng)選擇題有程序:INTEGERFF(X,Y)=X/Y+XA=-2.0B=4.0B=B+F(A,B)WRITE(*,20)B20FORMAT(1X,F(xiàn)4.1)END此程序的運(yùn)行結(jié)果是:()

A.1.0
B.1.5
C.2.0
D.3.0


你可能感興趣的試題

最新試題

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

題型:?jiǎn)雾?xiàng)選擇題

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

題型:?jiǎn)雾?xiàng)選擇題

有程序:F(C,D)=A*C+B/DA=1.0B=2.0WRITE(*,*)F(A,B)+F(B,A)END此程序的運(yùn)行結(jié)果是:()

題型:?jiǎn)雾?xiàng)選擇題

有程序:CHARATERX*2,Y*3,Z*4DATAX,Y,Z/‘AB’,‘CDE’,‘FGHI’/WRITE(*,100)X,Y,Z100FORMAT(1X,A1,A2,A3)END此程序的運(yùn)行結(jié)果是:()

題型:?jiǎn)雾?xiàng)選擇題

有程序:DIMENSIONA(2,2)INTEGERA,YY=0DO20I=1,2D020J=1,2A(I,J)=I*I+J*JY=Y+A(I,J)20CONTINUEWRITE(*,*)YEND此程序運(yùn)行的結(jié)果為:()

題型:?jiǎn)雾?xiàng)選擇題

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

題型:?jiǎn)雾?xiàng)選擇題

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

題型:?jiǎn)雾?xiàng)選擇題

有程序:M=2N=MD010I=1,N+1,NN=N*NM=M*N10CONTINUEWRITE(*,*)MEND此程序的運(yùn)行結(jié)果是:()

題型:?jiǎn)雾?xiàng)選擇題

下列程序執(zhí)行時(shí),需輸入數(shù)據(jù)的記錄個(gè)數(shù)必須為:DIMENSIONA(4,4)READ(*,*)A………………END()

題型:?jiǎn)雾?xiàng)選擇題

有程序:LOGICALLL=.TRUE.READ(*,*)xIF(x.LT.0)THENL=.FALSE.ELSEWRITE(*,*)xENDIFIF(.NOT.L)WRITE(*,*)-xEND執(zhí)行兩次以上程序,若運(yùn)行中的輸入值分別為2.5和-1.0,則兩次運(yùn)行結(jié)果分別是:()

題型:?jiǎn)雾?xiàng)選擇題