當(dāng)輸入10，20時(shí)，下列程序執(zhí)行后的輸出結(jié)果為()。
READ(*，*)IX，IY
A=100.0
IF(IX／IY.GT.0)THEN
A=1.0
ELSEIF(IX／IY.LT.0)THEN
A=-1.0
ELSE
A=0.0
ENDIF
WRITE(*，*)A
END
A.0.0
B.1.0
C.–1.0
D.100.0
您可能感興趣的試卷
你可能感興趣的試題
下列程序執(zhí)行后的輸出結(jié)果為()。
CHARACTER9*C
C=’1234567890’
CALLSS(C)
END
SUBROUTINESS(X)
CHARACTERX*2
WRITE(*，*)X
END
A.123456
B.12
C.56
D.567890
當(dāng)輸入1.5，2.5，3.5，4.0下列程序執(zhí)行后的輸出結(jié)果為()。
DIMENSIONA(2，2)
READ(*，*)A
SUM=0
DO10I=1，2
DO20J=I，2
K=A(I，J)*I*J
10A(1，2)=K
WRITE(*，*)A(2，1)
END
A.4.0
B.5.0
C.6.0
D.7.0
A.打印
B.編輯
C.執(zhí)行
D.刪除
A.可以減少屏幕的損耗
B.可以設(shè)置口令
C.可以保障系統(tǒng)安全
D.可以節(jié)省計(jì)算機(jī)內(nèi)存
A.DOC
B.XLS
C.WAV
D.HTM
最新試題
為解決主機(jī)與外圍設(shè)備操作速度不匹配的問題，Windows采用了()
在正弦交流電路中，電壓有效值u與電流有效值的乘積為（）。
下列程序執(zhí)行后的輸出結(jié)果為()。K=0DO10I=1，6，2DO10J=I，6，3IF(I.EQ.J)THENK=K+JELSEK=K+1ENDIF10CONTINUEWRITE(*，*)KEND
有程序：DIMENSIONA(2，2)INTEGERA．YY=0D0201=1，2D020J=1，2A(1，J)=I*I+J*JY=Y+A(1，J)20CONTINUEWRITE(*，*)YEND此程序運(yùn)行的結(jié)果（）
在Windows98資源管理器中，對(duì)磁盤格式化時(shí)若選中“快速格式化”復(fù)選框可以對(duì)磁盤進(jìn)行格式化，該磁盤必須是()。
當(dāng)輸入1.5，2.5，3.5，4.0下列程序執(zhí)行后的輸出結(jié)果為()。DIMENSIONA(2，2)READ(*，*)ASUM=0DO10I=1，2DO20J=I，2K=A(I，J)*I*J10A(1，2)=KWRITE(*，*)A(2，1)END
程序character*(*)namename=’apple’L=len(name)Do10I=1,L10name(I:I)=char(Ichar(name(I:I))+Iprint*,nameend程序運(yùn)行后輸出結(jié)果為()
在計(jì)算機(jī)中采用二進(jìn)制，是因?yàn)?)
語句WRITE(*，‘(1X，413)’)(I，I=1，10，2)，輸出記錄個(gè)數(shù)是()。
校園網(wǎng)屬于（）。