单选题

有程序:READ(*,*)xY=0.0IF=(xGT.0.0)THENY=1.0ELSEIF(x.GE.150)THENY=2.0ELSEY=3.0ENDIFWRITE(*,*)YEND当输入150时,此程序执行后的输出结果为:()

A0.0

B1.0

C2.0

D3.0

正确答案

来源:www.examk.com

答案解析

当执行第一个IF语句时,条件满足;此时Y=1.0;而后执行ENDIF后面的语句,输出Y值。
相似试题
  • 有程序:F(X,Y)=X/Y+XY=-2.0X=4.0X=1.0*F(Y,X)WRITE(*,*)XEND此程序的运行结果是:()

    单选题查看答案

  • 有程序:LOGICALLL=.TRUE.READ(*,*)xIF(x.LT.0)THENL=.FALSE.ELSEWRITE(*,*)xENDIFIF(.NOT.L)WRITE(*,*)-xEND执行两次以上程序,若运行中的输入值分别为2.5和-1.0,则两次运行结果分别是:()

    单选题查看答案

  • 有程序:DIMENSION(4,4)READ(*,*)AWRITE(*,10)A10FORMAT(1x,6E9.2)END此程序执行后的输出结果的记录数为:()

    单选题查看答案

  • 有程序:READ(*,50)SWRITE(*,100)S50FORMAT(1X,F7.3)100FORMAT(1X,F8.3)END执行此程序,由键盘输入123456789,则输出S的值为:()

    单选题查看答案

  • 有程序:READ(*,100)A100FORMAT(3x,F6.2)WRITE(*,200)A200FORMAT(1x,F8.2)END当执行此程序时,从键盘输入1234567890↙,则程序的运行结果是:()

    单选题查看答案

  • 有程序:DIMENSIONx(3,3)READ(*,*)xCALLSSl(x(1,2))ENDSUBROUTINESSl(x)DIMENSIONx(3)WRITE(*,*)x(2)END当输入1、2、3、4、5、6、7、8、9时,此程序执行后的输出结果为:()

    单选题查看答案

  • 下列程序执行时,需输入数据的记录个数必须为:DIMENSIONA(4,4)READ(*,*)A………………END()

    单选题查看答案

  • 有程序:READ(*,10)IA,IIF(IA.GE.125)THENI=I+10,ELSEI=I-10ENDIFWRITE(*,*)I10FORMAT(I2,I1)END执行上面的程序时,从键盘输入365,2,则运行后结果I的值是:()

    单选题查看答案

  • 对任意输入的x,READ(*,*)xK=SIN(x)WRITE(*,*)KEND此程序执行后K的值为:()

    单选题查看答案