A.1234.576
B.2345.678
C.345.678
D.*******
您可能感興趣的試卷
你可能感興趣的試題
A.8.E+02
B.1.E+03
C.格式錯誤
D.1.0000E+03
A.TT
B.FF
C.TF
D.FT
A.ABCDEF
B.ACDFGH
C.******
D.ABCDEFGHI
A.4567.89
B.1234.56
C.******
D.1234.5
A.3.0;11.0
B.6.0;11.0
C.6.0;18.0
D.11.0;18.0
最新試題
有程序:F(C,D)=A*C+B/DA=1.0B=2.0WRITE(*,*)F(A,B)+F(B,A)END此程序的運行結(jié)果是:()
有程序:CHARATERX*2,Y*3,Z*4DATAX,Y,Z/‘AB’,‘CDE’,‘FGHI’/WRITE(*,100)X,Y,Z100FORMAT(1X,A1,A2,A3)END此程序的運行結(jié)果是:()
有程序:INTEGERB(3,3)DATAB/3*2,3*3,3*4/DO10I=1,310WRITE(*,‘(1X,3I2)’)(B(I,J),J=1,3)END此程序的運行結(jié)果是:()
有程序:READ(*,100)A100FORMAT(3x,F(xiàn)6.2)WRITE(*,200)A200FORMAT(1x,F(xiàn)8.2)END當執(zhí)行此程序時,從鍵盤輸入1234567890↙,則程序的運行結(jié)果是:()
有程序:READ(*,10)IA,IIF(IA.GE.125)THENI=I+10,ELSEI=I-10ENDIFWRITE(*,*)I10FORMAT(I2,I1)END執(zhí)行上面的程序時,從鍵盤輸入365,2,則運行后結(jié)果I的值是:()
有程序:ADD(X,Y)=X**2+YOPEN(8,F(xiàn)ILE=‘F’,STATUS=‘NEW’,ACCESS=‘DIRECT’,*FORM=‘UNFORMATTED’,REAL=16DO10I=1,4D=ADD(REAL(I),2、0)WRITE(8,REC=I)D10CONTINUECLOSE(8)OPEN(2,F(xiàn)ILE=‘F’,STATUS=‘OLD’,ACCESS=‘DIRECT’,*FORM=‘UNFORMATTFED’,REAL=6DO20I=2,4,2READ(2,REC=I)CWRITE(*,30)C20CONTINUE20FORMAT(1x,F(xiàn)4.1)CLOSE(2)END執(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é)果為:()
下列程序執(zhí)行時,需輸入數(shù)據(jù)的記錄個數(shù)必須為:DIMENSIONA(4,4)READ(*,*)A………………END()
有程序: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é)果為:()
有程序: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上面程序的運行結(jié)果為:()