單項(xiàng)選擇題有程序:READ(*,*)xY=0.0IF=(xGT.0.0)THENY=1.0ELSEIF(x.GE.150)THENY=2.0ELSEY=3.0ENDIFWRITE(*,*)YEND當(dāng)輸入150時(shí),此程序執(zhí)行后的輸出結(jié)果為:()

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


你可能感興趣的試題

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

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

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

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

7.單項(xiàng)選擇題以下存在語法錯(cuò)誤的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’)

8.單項(xiàng)選擇題在FORTRAN語言中,文件存取單位是()

A.文件
B.變量
C.記錄
D.字節(jié)

9.單項(xiàng)選擇題下列幾種關(guān)于存取文件的描述哪個(gè)是正確的?()

A.有格式文件只能按順序文件的形式存取
B.有格式文件的存取適用于順序文件也適用于直接文件
C.無格式文件只適用于直接文件存取
D.無格式文件只適用于順序文件存取

10.單項(xiàng)選擇題對OPEN(4,F(xiàn)ILE=‘BB.DAT’,STATUS=‘OLD’,語句,下面哪個(gè)描述是正確的()?

A.打開一個(gè)有格式順序文件,可以讀文件
B.打開一個(gè)有格式直接文件,可以寫文件
C.打開一個(gè)有格式直接文件,可以讀寫
D.打開一個(gè)直接文件

最新試題

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

題型:單項(xiàng)選擇題

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

題型:單項(xiàng)選擇題

有程序:I=5J=10K=20M=-10IF(I.GT.M)M=IIF(J.GT.M)M=JIF(K.GT.M)M=KWRITE(*,*)MEND此程序的運(yùn)行結(jié)果是:()

題型:單項(xiàng)選擇題

有程序:DIMENSION(4,4)READ(*,*)AWRITE(*,10)A10FORMAT(1x,6E9.2)END此程序執(zhí)行后的輸出結(jié)果的記錄數(shù)為:()

題型:單項(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é)果為:()

題型:單項(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é)果為:()

題型:單項(xiàng)選擇題

有程序: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上面程序的運(yùn)行結(jié)果為:()

題型:單項(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é)果是:()

題型:單項(xiàng)選擇題

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

題型:單項(xiàng)選擇題

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

題型:單項(xiàng)選擇題