程序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