單項(xiàng)選擇題下面符合語(yǔ)法規(guī)定的語(yǔ)句是：（）

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


你可能感興趣的試題

1.單項(xiàng)選擇題下面正確的邏輯IF語(yǔ)句是哪一條（）？

A.IF（NX.BQ.NY）THENGOTO10
B.IFA.LT.BPRANT*
C.IF（ABS（x）.LE.1E-5）x=5
D.IF（S.AND.（S.LE.2.0））S=2*3

2.單項(xiàng)選擇題下列語(yǔ)句中哪條是錯(cuò)誤的（）？

A.WRITE（*，*）（I，A（I），I=1，N）
B.WRITE（*，*）（N，A（I），I=1，N）
C.READ（*，*）N，（A（I），I=1，N）
D.READ（*，*）（N，A（I），I=1，N）

5.單項(xiàng)選擇題M不能被N整除的FORTRAN表達(dá)式為：（）

A.（M／N）.NE.0
B.NOT.（MOD（M，N）.NE.0）
C.MOD（M，N）.NE.0
D.INT（M／N）.NE.0

最新試題

有程序：F1（x）=2．0／（1．0+x）F2（Y）=F1（Y）*Y+1．0A=F1（1．0+F2（1．0）WRITE（*，10）A10FORMAT（1x，E8．2）END此程序執(zhí)行后的輸出結(jié)果為：（）

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

有程序：DIMENSIONA（4，3）DATAA／3*-1．0，3*-2．0，3*-3．0，3*-4．0／S=0．0DO10K=1，4D=ABS（A（K，1））DO20J=2，3IF（ABS（A（K，J））．GT．D）D=ABS（A（K，J））20CONTINUES=S+D10CONTINUEWRITE（*，*）SEND此程序執(zhí)行后的結(jié)果為：（）

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

有程序：READ（*，10）IA，IIF（IA．GE．125）THENI=I+10，ELSEI=I-10ENDIFWRITE（*，*）I10FORMAT（I2，I1）END執(zhí)行上面的程序時(shí)，從鍵盤輸入365，2，則運(yùn)行后結(jié)果I的值是：（）

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

有程序：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)選擇題

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

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

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

題型：?jiǎn)雾?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é)果是：（）

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

有程序：INTEGERFF（X，Y）=X+YA=-2．0B=4．0B=1．0+F（A，B）WRITE（*，‘（1X，F(xiàn)3．1）’）BEND此程序的運(yùn)行結(jié)果是：（）

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

下列說(shuō)法中，正確的一條是（）

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

有程序：DO10I=1，5，3DO10J=I，310K=I+JWRITE（*，*）KEND此程序的運(yùn)行結(jié)果是：（）

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