首页 > 财会类考试

题目内容（请给出正确答案）

[多选题]

在VB中，下列程序段执行后，输出的结果为（）s=1For i=1 To 6 Step 2s=s*iNext iPrint s

A.9

B.15

C.105

D.720

答案

如果结果不匹配，请联系老师获取答案

您可能会需要：

重置密码查看订单联系客服

安装优题宝APP，拍照搜题省时又省心！

更多“在VB中，下列程序段执行后，输出的结果为（）s=1For i…”相关的问题

第1题

有如下VB程序段：K=1For i=2 To 4ifa（i）<a（k）Thenk=iNext iLfk<>1ThenT=a（1）a（1）=a（k）a（k）=tEnd If已知数组元素a（1）~a（4）的值依次为“36,28,57,21”,程序段执行后,数组元素a（1）~a（4）的值为（）

A.21,28,57.36

B.36.28,57,21

C.57.28,36.21

D.28,36,57,21

点击查看答案

第2题

有如下VB程序段：a（1） = 1：a（2） =1：b（1） =1：b（2 ） = 2For i = 3 To 5a（i） = a（i-1） + a（i-2）b（i） = b（i-1） + a（i）Next i执行该程序段后，数组元素b（5）的值为（）

A.4

B.5

C.8

D.12

点击查看答案

第3题

当输入1，2，3，4，5，6下列程序执行后的输出结果为DIMENSION A（2，3)READ（*，*) ACALL SS1（A)ENDSUBROU

当输入1，2，3，4，5，6下列程序执行后的输出结果为 DIMENSION A(2，3) READ(*，*) A CALL SS1(A) END SUBROUTINE SS1(B) DIMENSION B(3，2) WRITE(*，*) B(3，1) END

A．2

B．3

C．4

D．5

点击查看答案

第4题

下列程序执行后的输出结果为（)。CHARACTER*6 SS='ABCDEFCALL SS（S)ENDSUBROUTINE SS（S1)CHARACTER

下列程序执行后的输出结果为()。 CHARACTER *6 S S='ABCDEF CALL SS(S) END SUBROUTINE SS(S1) CHARACTER S1*3 WRITE(*，*) S1 END

A．ABC

B．BC

C．CDE

D．DEF

点击查看答案

第5题

下列程序执行后的输出结果为（)。K=0DO101=1，6，2DO10 J=I，6，3IF（K.LT.I*J) K=I*J10CONTINUEWRITE（*

下列程序执行后的输出结果为()。 K=0 DO 10 1=1，6，2 DO 10 J=I，6，3 IF(K.LT.I*J) K=I*J 10 CONTINUE WRITE(*，*) K END

A．18

B．30

C．25

D．36

点击查看答案

第6题

当输入150时，下列程序执行后的输出结果为（)。READ（*，*) XY=0.0IF（X.GT.O.0) THENY=1.0ELSE IF（X.G

当输入150时，下列程序执行后的输出结果为()。 READ(*，*) X Y=0.0 IF(X.GT.O.0) THEN Y=1.0 ELSE IF(X.GE.150) THEN Y=2.0 ELSE Y=3.0 END IF WRITE(*，*) Y END

A．0.0

B．1.0

C．2.0

D．3.0

点击查看答案

第7题

当输入150H，f1，下列程序执行后的输出结果为（)。READ（*，*) XY=0.0IF（X.GT.O.C) THENY=1.0ELSEIF（X.

当输入150H，f1，下列程序执行后的输出结果为()。 READ(*，*) X Y=0.0 IF(X.GT.O.C) THEN Y=1.0 ELSE IF(X.GE.150) THEN Y=2.0 ELSE Y=3.0 END IF WRITE(*，*)Y END

A．0.0

B．1.0

C．2.0

D．3.0

点击查看答案

第8题

在VB程序中，当变量H的值等于8时，执行“IF H>8 then R=10 else R=20”语句后，R值为（）

A.8

B.10

C.20

D.10或20

点击查看答案

第9题

下列程序执行后的输出结果为（)。F1（X)=2.0/（1.0+X)F2（Y)=F1（Y)*Y+1.0A=F1（1.0)+F2（1.0)WRITE（*，10

下列程序执行后的输出结果为()。 F1(X)=2.0/(1.0+X) F2(Y)=F1(Y)*Y+1.0 A=F1(1.0)+F2(1.0) WRITE(*，10) A 10 FORMAT(IX，E8.2) END

A．3.00

B．3.0

C．3.00E+00

D．0.30E+01

点击查看答案

第10题

有如下VB程序段：s ＝ 0For i ＝ 1 To 15s ＝ s ＋ i Mod 2Next iLabel1.Caption ＝ Str（s）该程序运行后，在标签Label1中显示的是（）

A.5

B.7

C.8

D.9

点击查看答案

第11题

写出下列程序执行后的结果SeqQueue Q;InitQueue(Q);int a[4]- (5,8,12,15);for(int i=0;i＜4;i+ +) InQueue(Q,a[i]);InQueue(Q,OutQueue(Q));InQueue(Q,30);InQueue(Q,OutQueue(Q)+ 10);while(! QueueEmpty(Q)) printf("%d ",OuQueue(Q));执行后的输出结果为()

A.5 8 12 15 30

B.12 15 5 30 18

C.8 12 15 30 18

D.12 15 5 18 30

点击查看答案