[单选题]

有如下一段程序: SET TALK OFF A=1 B=0 DO WHILE A<:100 I

F.NOT.A/2=INT(A/2)B=B+A ENDIF A=A+1 ENDD0 ? 8 SET TALK ON RETURN 该程序的功能是( )。

A. 求1到100之间的累加和

B. 求1到100之间的累加和除以2的商

C. 求1到100之间的偶数之和

D. 求1到100之间的奇数之和

参考答案与解析:

相关试题

有如下一段程序:SET TALK OFFA=1B=0DO WHILE A<=10

[单选题]有如下一段程序: SET TALK OFF A=1 B=0 DO WHILE A<=100 IF.NOT.A/2=INT(A/2) B=B+A ENDIF A=A+1 ENDDO ? B SET TALK ON RETURN 该程序的功能是______。A.求1~100之间的累加和B.求1~100之间的累加和除以2的商C.求1~100之间的偶数之和D.求1~100之间的奇数之和

  • 查看答案
  • 有如下一段程序:SET TALK OFFA=1B=0DO WHILE A<=10

    [单选题]有如下一段程序: SET TALK OFF A=1 B=0 DO WHILE A<=100 IF.NOT.A/2=INT(A/2) B=B+A ENDIF A=A+1 ENDDO ?B SET TALK ON RETURN 该程序的功能是A.求1到100之间的累加和B.求1到100之间的累加和除以2的商C.求1到100之间的偶数之和D.求1到100之间的奇数之和

  • 查看答案
  • 有如下一段程序:SET TALK OFFAY="Hello World!"BY=

    [单选题]有如下一段程序: SET TALK OFF AY="Hello World!" BY="X" CY=ASC(BY)+1 DY=30 EY=CHR(DY*2+5)+CHR(CY) EY=&EY ?"&EY." SET TALK ON RETURN 执行该程序后,屏幕显示的结果为______。A.AYB.BYC.Hello world!D.程序出错

  • 查看答案
  • 若有如下程序: SET TALK OFF INPUT TO X FOR i=1

    [单选题]若有如下程序: SET TALK OFF INPUT TO X FOR i=1 TO 3 INPUT TO Y IF Y>X X=Y ENDIF ENDFOR ?X RETURN 本程序的功能是( )。A.求3个数中的最大值B.求4个数中的最大值C.求3个数中的最小值D.求4个数中的最小值

  • 查看答案
  • 有如下程序:SET TALK OFFM=ON=ODO WHILE N>MM£­M

    [单选题]有如下程序: SET TALK OFF M=O N=O DO WHILE N>M M-M+N N=N-10 ENDDO ?M RETURN 运行此程序显示M的值( )。A.0B.10C.100D.99

  • 查看答案
  • (程序)SET TALK OFFS=0I=1DO WHILE I<4 ACCEP

    [单选题](程序)SET TALK OFFS=0I=1D.O WHILE I<4A.CCEPT “请输入字符串:”TO XIF“A” $ XS=S+1E.NDIFI=I+1 ENDDO? SRETURN运行时输入:“abcd”、“aBCD”,输出S的值为 ______。A.3B.2C.1D.0

  • 查看答案
  • (程序)SET TALK OFFCLEARX=3DO WHILE .T.X=X£

    [单选题](程序)SET TALK OFFC.LEARX=3D.O WHILE .T.X=X+1IF X=INT(X/3)*3? XE.LSELOOPE.NDIFIF X>10E.XITE.NDIFE.NDDOSET TALK ONRETURN当变量X的值第一次变化时,X的输出结果为 ______。A.3B.6C.8D.12

  • 查看答案
  • SET TALK OFF STORE O TO X,Y D0 WHILE.T.

    [主观题]SET TALK OFFSTORE O TO X,YD.0 WHILE.T.X=X+1Y=Y+XIF X>=5E.XITE.NDIFE.NDDO?X,YRETURN当程序执行到?x,Y命令时,X,Y的值分别是[ ]、[ ]。

  • 查看答案
  • 有如下程序:SET TALK OFFDIMENSION K(2,3)I=1D0

    [单选题]有如下程序: SET TALK OFF DIMENSION K(2,3) I=1 D0 WHILE I<=2 J=1 DO WHILE J<=3 K(1,J)-I*J ??K(I,J) ??” ” J=J/1 ENDDO ? I=I+1 ENDDO RETURN 运行此程序的结果是( )。A.1 2 3 4 5 6B.1 2 3 2C.1 2 3 1 2 3D.1 2 3 1 4 9

  • 查看答案
  • (程序)SET TALK OFFSTORE 0 TO X,YDO WHILE X

    [单选题](程序)SET TALK OFFSTORE 0 TO X,YD.O WHILE X<20X=X+YY=Y+2&& IF Y=4&& EXIT&& ENDIFE.NDDO? X,YSET TALK ONRETURNX的输出结果为 ______。A.20B.21C.22D.10

  • 查看答案
  • 有如下一段程序: SET TALK OFF A=1 B=0 DO WHILE