单项选择题

阅读以下FORTRAN程序：
READ(，)X
IF(X，LE，0)RHEN
Y=0.0
ELSEIF(X，LT，5，0)，AND，(X，NE，2，0)THEN
Y=1/X
ELSEIF(X，LE，10，0)THEN
Y=1/(X+2)
ELSE
Y=10.0
ENDIF
WRITE
WRITE(，)Y
END
运行上述程序时，若由键盘输入：2，则程序输出结果为（）。

A．0.0
B．0.5
C．0.25
D．10.0

<上一题目录下一题>

热门试题

单项选择题

A．Re_A＞Re_B
B．Re_A＜Re_B
C．Re_A=Re_B
D．不能确定

单项选择题

A．100 m/s；25000 m/s²
B．100 m/s；50000 m/s²
C．50 m/s；2500 m/s²
D．50 m/s；5000 m/s²

阅读以下FORTRAN程序： READ(*，*)X IF(X，LE，0)RHEN Y=0.0 ELSEIF(X，LT，5，0)，AND，(X，NE，2，0)THEN Y=1/X ELSEIF(X，LE，10，0)THEN Y=1/(X+2) ELSE Y=10.0 ENDIF WRITE WRITE(*，*)Y END 运行上述程序时，若由键盘输入：2，则程序输出结果为（）。