A.打開一個有格式順序文件,可以讀文件
B.打開一個有格式直接文件,可以寫文件
C.打開一個有格式直接文件,可以讀寫
D.打開一個直接文件
您可能感興趣的試卷
你可能感興趣的試題
A.函數值只能通過函數名返回
B.當實參為變量時,形參的改變影響實參的值
C.一個函數子程序只能返回一個函數值或一個變量值
D.函數值只能通過形實結合雙向傳遞
A.可以是變量名、數組名、符號常量
B.可以是變量名、數組名、子程序名
C.只能是變量名或數組名
D.只能是變量名
A.N=SDIMENSIONA(3,4),I(2,2),C(N)
B.REALA(3,4),I(2,2),C(2*2)
C.DIMENSIONA(3,4),I(2,2),C(3)REALA(3,4),I(2,2),C(3)
D.READ(*,*)MINTEGERIA(0:M)
A.循環(huán)嵌套的各層循環(huán)變量不能同名
B.在循環(huán)體內不能再給循環(huán)變量賦值
C.循環(huán)嵌套中可以從內循環(huán)轉向外循環(huán)
D.各種循環(huán)可以互相嵌套
A.IF(x、LT、O、O.GT.5.0)x=TRUE
B.IF(.NOT.(x.LT.1.0))y=FALSE
C.IF(xEQV.Y)A=T
D.IF(x.LT.1.0)THENY=.FALSE
![](https://static.ppkao.com/ppmg/img/appqrcode.png)
最新試題
有程序:INTEGERB(3,3)DATAB/3*2,3*3,3*4/DO10I=1,310WRITE(*,‘(1X,3I2)’)(B(I,J),J=1,3)END此程序的運行結果是:()
有程序:DIMENSION(4,4)READ(*,*)AWRITE(*,10)A10FORMAT(1x,6E9.2)END此程序執(zhí)行后的輸出結果的記錄數為:()
有程序: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此程序運行的結果為:()
有程序:LOGICALLL=.TRUE.READ(*,*)xIF(x.LT.0)THENL=.FALSE.ELSEWRITE(*,*)xENDIFIF(.NOT.L)WRITE(*,*)-xEND執(zhí)行兩次以上程序,若運行中的輸入值分別為2.5和-1.0,則兩次運行結果分別是:()
有程序:N=0DOK=6,2,-2N=N+KM=2*N10CONTINUEWRITE(*,*)MEND上面程序的運行結果是:()
有程序:DIMENSIONA(2,2)INTEGERA,YY=0DO20I=1,2D020J=1,2A(I,J)=I*I+J*JY=Y+A(I,J)20CONTINUEWRITE(*,*)YEND此程序運行的結果為:()
有程序: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í)行后的結果為:()
有程序:INTEGERFF(X,Y)=X+YA=-2.0B=4.0B=1.0+F(A,B)WRITE(*,‘(1X,F(xiàn)3.1)’)BEND此程序的運行結果是:()
有程序:READ(*,100)A100FORMAT(3x,F(xiàn)6.2)WRITE(*,200)A200FORMAT(1x,F(xiàn)8.2)END當執(zhí)行此程序時,從鍵盤輸入1234567890↙,則程序的運行結果是:()
有程序: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’,程序運行結果是:()