当前位置: 答题翼 > 问答 > 建筑工程类考试 > 正文
目录: 标题| 题干| 答案| 搜索| 相关
问题

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

参考答案
您可能感兴趣的试题
  • 阅读以下 FORTRAN 程序:READ(* , *)XIF(X , LE , 0)RHENY=0.0ELSEIF(X , LT , 5 , 0) , AND , (X

  • 阅读下列FORTRAN77程序: READ(* , *)X IF(X.LE.0) THEN Y=0.0 ELSE IF ((X.LT.5.0).AND.(X.N

  • 有程序段READ *,X,YZ=10IF(X.GT.0)THENZ=X+YELSE IF(X.LT.0)THENZ=X-YELSEZ=X*YENDIF输入数据0,1

  • 以下程序段DIMENSION A(4)READ *,AI=110 J=1+120 IF(A(I).LT.A(J))THENT=A(J)A(J)=A(I)A(I)=TEND

  • 有以下程序段main(){ char x=040; printf("%d\n",x$amp;<amp;$lt;1);}程序执行后输出的结果是A.100 B.8

  • 有程序:READ( * *)x Y=0. 0IF=(x.GT.0. 0)THEN Y=1.0EL