程序READ(* *)XIF((X . LT . -5.0) . OR . (X . EQ . -1.0))THENY=0.0ELSEIF(X . LT . 0.0)THE

建筑类 程序,结果 已帮助 人

程序

READ(* , *)X

IF((X . LT . -5.0) . OR . (X . EQ . -1.0))THEN

Y=0.0

ELSEIF(X . LT . 0.0)THEN

Y=1.0/(X+1.0)

EISEIF(X . LT . 5.O)THEN

Y=1.0/(X+2.0)

ELSE

Y=0.0

ENDIF

WRITE(* , *)Y

END

若输入 4.0 ,则结果为 () 。

(A) 0.0

(B) 1/5

(C) 1/6

(D) 1/4

热搜:特征x射线与荧光x射线的产生机理有何不同