單項(xiàng)選擇題有程序: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é)果是:()

A.3.0;11.0
B.6.0;11.0
C.6.0;18.0
D.11.0;18.0


你可能感興趣的試題

3.單項(xiàng)選擇題有程序:INTEGERM(3,3)DATAM/1,2,3,4,5,6,7,8,9/DO10I=1.3DO10J=1,3K=M(I,J)M(I,J)=M(J,I)M(J,I)=K10CONTINUEWRITE(*,100)((M(I,J),J=1,3),I=1,3)100FORMAT(1x,3I2)END此程序執(zhí)行后的結(jié)果為:()

A.1;4;7;2;5;8;3;6;9
B.1;2;3;4;5;6;7;8;9
C.9;6;3;8;5;2;7;4;1
D.7;8;9;4;5;6;1;2;3

最新試題

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

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

一般認(rèn)為,世界上第一臺(tái)電子數(shù)字計(jì)算機(jī)誕生于()

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

有程序:LOGICALA,B,C,DINTEGERX,YDATAX,Y,A,B/1,-1,2*.FALSE./C=.NOT.A.AND(B.OR.XGE.Y)D=.NOT.(A.AND.B.OR、X.GE.Y)WRITE(*,*)C,DEND上面程序的運(yùn)行結(jié)果是:()

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

第一代計(jì)算機(jī),體積大,耗電多,性能低,其主要原因是制約于()

題型:?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*6SS=‘ABCDEF’CALLSS(S)ENDSUBROUTINESS(S1)CHARACTERS1*3WRITE(*,*)S1END此程序執(zhí)行后的輸出結(jié)果為:()

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

有程序:READ(*,100)A100FORMAT(3x,F(xiàn)6.2)WRITE(*,200)A200FORMAT(1x,F(xiàn)8.2)END當(dāng)執(zhí)行此程序時(shí),從鍵盤(pán)輸入1234567890↙,則程序的運(yùn)行結(jié)果是:()

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

有程序:CHARACTER*4STR1,STR2,STR3OPEN(UNIT=15,F(xiàn)ILE=‘INPUT.DAT’,STATUS=‘OLD’)READ(15,10)STR1,STR2,STR310FORMAT(A6,1x,A5,1x,A4)WRITE(*,’(1x,3A)’)STR1,STR2,STR3CLOSE(15)END用此程序從文件INPUT.DAT中讀出字符串’FORMATANEWDISK’,程序運(yùn)行結(jié)果是:()

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

下列說(shuō)法中,正確的一條是()

題型:?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)選擇題