网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
单选题
有如下VB程序，它的输出结果是（）。 S=0 For I=1 To 10 S=S+I Next I Print “S=”；S
A
0
B
S=S+I
C
55
D
S=55
参考答案
参考解析
解析：
暂无解析
更多 “单选题有如下VB程序，它的输出结果是（）。 S=0 For I=1 To 10 S=S+I Next I Print “S=”；SA 0B S=S+IC 55D S=55” 相关考题
考题
下列程序运行后，输出结果为( )。 Dim a() a＝Array(1,3,5,7,9) s＝0 For i＝1 To 4 s＝s*10+a(i) Next i Print sA．1357B．3579C．7531D．9753
考题
（25）下列程序段的输出结果是 Dim M(5,5),S(5) For i=1 To 5 S(i)=0 For j=1 To 5 M(i,j)=i+j S(i)=S(i)+M(i,j) Next j Next i For Each x In S Print x； Next xA.20 23 24 35 40 B.20 25 30 35 40 C.20 23 25 35 40 D.20 25 35 40 45
考题
设有如下程序： Private Sub Form. Click（ ） Dim s As Long，f As Long Dim n As Integer，i As Integer f=1 n=4 For i=1 To n f=f*i s=s+f Next i Print s End Sub 程序运行后，单击窗体，输出结果是（ ）。A.32B.33C.34D.35
考题
在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Commandl_Click() Dim a() a=Array(1，3，5，7) s=0 For i=1 To 3 S=S*10+a(i) Next i Print s End Sub 程序运行后，输出结果为( )。A．135B．357C．531D．753
考题
在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a() a=Array(1，3，5，7) s=0 For i=1 To 3 s=s*10+a(i) Next i Print s End Sub 程序运行后，输出结果为( )。A．135B．357C．531D．753
考题
下列程序段的输出结果为( )。 Dim M(5,5), S(5) For i = 1 To 5 S(i) = 0 For j = 1 To 5 M(i, j) = i + j S(i) = S(i) + M(i, j) Next j Next i For Each x In S Print x; Next xA．2023 24 3540B．2025 30 3540C．2023 25 35 40D．2025 354045
考题
程序段如下： Dim i As Integer，s As Integer For i=4 To 1 Step-1 s=s+i Next i Print s，i执行的结果是( )。A．10 0B．9 1C．10 1D．9 0
考题
下列程序运行后的输出结果是______。Private Sub f(k,s) s = 1 for j = 1 To k s=s*j Next jEnd SubPrivate Sub Command1_ Click () Sum = 0 for i = 1 To 3 Call f(i, s) Sum = Sum + s Next i Print Sum End SubA．0B．3C．6D．9
考题
下列程序段的招待结果是______ 。 s=0 t=0 u=0 For i = 1 To 3 For j = 1 To i For k = j To 3 s=s+ 1 Next k t=t+1 Next j u=u+ 1 Next i Print s; t; uA． 14 6 3B．6 14 3C．9 8 7D．8 9 10
考题
在窗体上面1个名称为Command1的命令按钮，然后编写下列事件过程 Option Base 1 Private Sub，Command1 Click（ ） Dim a(5，5)ks Integer For i=1 To j For j=1 To 5 a(i，j)=(i+j)*5＼10 Next j Next i S=0 For i=1 To j s=s+a(i，i) Next i Print s End Sub 程序运行后，单击命令按钮，输出结果是（ ）。A.15B.13C.11D.9
考题
程序段： S=0 For I=1 to 5 step 2 S=s+I Next I Print I语句S=S+1执行的次数和最后I的值分别为( )。A．3，7B．2，5C．3，5D．2，7
考题
程序代码如下，当单击窗体上的Command1控件时，在窗体上输出的结果是( )。 Private Sub Command1_Click() Dim aa(3，3)As Integer Dim i As Integer,j As Integer Dim s As Integer For i=0 To 3 For j=0 To 3 aa(i，j)=i*4+j+1 Next j Next i For i=0 To 3 s=s+aa(i，1) Next i Print s End SubA．32B．28C．30D．36
考题
下面程序运行后输出结果是( )。 For I=1 to 2 S=1 For j=0 to I-1 S=S+S*I Next j Print S Next IA．1 1B．0 2C．2 9D．6 9
考题
在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Commandl Click() Dim a() a=Array(1,3,5,7) s=0 For i=1 To 3 S=S*10+a(i) Next i Print s End Sub 程序运行后，输出结果为( )。A．135B．357C．531D．753
考题
下面程序的运行结果是______。 Dim a，i，s a=Array("6"，"5"，"a"，"b"，"2"，"1") s=0 i=0 Dw While a(i)＞="0" And a(i)＜="9" s=10* s+a(i)-"0" Print s i=i+2 LoopA．12ba56B．652C．6D．62
考题
程序段如下； s=0 For I=5 to -1 step -2 S=s+I Next I Print I 语句S=S+I执行的次数和最后I的值分别为( )。A．3,-1B．4,-1C．4,-3D．0, 5
考题
下面代码输出结果是( )。inti=0,s=0;do{if(i%2==0){i＋＋;continue;}i＋＋;s=s＋i;}while(i
下面代码输出结果是( )。inti=0,s=0;do{if(i%2==0){i++;continue;}i++;s=s+i;}while(iSystem.out.println(s);A、16B、12C、28D、21
考题
下列程序段的输出结果为( )。 Dim M(S, S), S(5) For i=1 To 5 S(i)=0 For j=1 To 5 M(i, j)=i+j S(i)=S(i)+M(i, j) Next j Next i For Each x In S Print x; Next xA．20 23 24 35 40B．20 25 30 35 40C．20 23 25 35 40D．20 25 35 40 45
考题
求整数1至10的和并存入变量s，下列语句中错误的是（）。A、s=0；for（i=1；i=10；i++）s+=i；B、s=0；i=1；for（；i=10；i++）s=s+i；C、for（i=1，s=0；i=10；s+=i，i=i+1）；D、for（i=1；s=0；i=10；i++）s=s+i；
考题
若变量已正确定义，以下不能正确计算1+2+3+4+5的程序段是（）。A、i=1；s=1；do{s=s+i；i++；}while（i5）；B、i=0；s=0；do{i++；s=s+i；}while（i5）；C、i=1；s=0；do{s=s+i；i++；}while（i6）；D、i=1；s=0；do{s=s+i；i++；}while（i=5）；
考题
以下为求0到1000以内所有奇数和的算法，从中选出描述正确的算法（）。A、①s=0；②i=1；③s=s+i；④i=i+2；⑤如果i≤1000，则返回③；⑥结束B、①s=0；②i=1；③i=i+2；④s=s+i；⑤如果i≤1000，则返回③；⑥结束C、①s=1；②i=1；③s=s+i；④i=i+2；⑤如果i≤1000，则返回③；⑥结束D、①s=1；②i=1；③i=i+2；④s=s+i；⑤如果i≤1000，则返回③；⑥结束
考题
单选题以下为求0到1000以内所有奇数和的算法，从中选出描述正确的算法（）。A
①s=0；②i=1；③s=s+i；④i=i+2；⑤如果i≤1000，则返回③；⑥结束B
①s=0；②i=1；③i=i+2；④s=s+i；⑤如果i≤1000，则返回③；⑥结束C
①s=1；②i=1；③s=s+i；④i=i+2；⑤如果i≤1000，则返回③；⑥结束D
①s=1；②i=1；③i=i+2；④s=s+i；⑤如果i≤1000，则返回③；⑥结束
热门标签
最新试卷
