网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
以下能够正确计算1+2+3+…+10的程序是
A．Private sub Command1_Click( ) sum=0 For 1=1 To 10 Sum=sum+1， Next I Print Sum End Sub
B．Private sub Command1_Click( ) Sum=0,I=1 Do While l＜=10 Sum=Sum+1 I=I+1 Print Sum End Sub
C．Private Sub command1_click( ) Sum=0：I=1 Do Sum=Sum+1 I=I+1 Loop While I＜10 Print Sum End Sub
D．Private Sub command1_Click( ) Sum=0：I=1 Do Sum=Sum+1 l=I+1 Loop Until I＜10 Print Sum End Sub
参考答案
更多 “ 以下能够正确计算1+2+3+…+10的程序是A．Private sub Command1_Click( ) sum=0 For 1=1 To 10 Sum=sum+1， Next I Print Sum End SubB．Private sub Command1_Click( ) Sum=0,I=1 Do While l＜=10 Sum=Sum+1 I=I+1 Print Sum End SubC．Private Sub command1_click( ) Sum=0：I=1 Do Sum=Sum+1 I=I+1 Loop While I＜10 Print Sum End SubD．Private Sub command1_Click( ) Sum=0：I=1 Do Sum=Sum+1 l=I+1 Loop Until I＜10 Print Sum End Sub ” 相关考题
考题
窗体上有一个名称为List1的列表框，一个名称为Text1的文本框，一个名称为Label1、Caption属性为“Sum”的标签，一个名称为Command1、标题为“计算”的命令按钮。程序运行后，将把1～100之间能够被7整除的数添加到列表框中。如果单击“计算”按钮，则对List1中的数进行累加求和，并在文本框中显示计算结果，如图所示。以下是实现上述功能的程序，请填空。Private Sub Form_Load（）For i=1 To 100If i Mod 7 =0 Then________End IfNextEnd SubPrivate Sub Command1_Click（）Sum = 0For i = 0 To ________Sum = Sum + ________NextText1.Text = SumEnd Sub
考题
（ 9 ）下面的函数利用递归实现了求 1+2+3+ …… +n 的功能：int sum （ int n ） {if （ n==0 ）return 0;elsereturn n+sum （ n-1 ） ；}在执行 sum （ 10 ）的过程中，递归调用 sum 函数的次数是【 9 】 。
考题
设有如下程序： Private Sub Command1_Click() Dim sum As Double, k As Double sum=0 n=0 For i=1 To 5 k=n/i n=n+1 sum=sum+k Next End Sub 该程序通过For循环计算一个表达式的值，这个表达式是______。A．1+1/2+2/3+3/4+4/5B．1+1/2+2/3+3/4C．1/2+2/3+3/4+4/5D．1+1/2+1/3+1/4+1/5
考题
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Sum=0 For x=1 To 5 Call subl(x, s) Sum=Sum+s Next x Print Sum End Sub Private Sub subl(y, w) w=1 For i=1 To y w=w*i Next i End Sub 程序运行后。单击命令按钮，则窗体上显示的内容是______。A．5B．120C．153D．160
考题
下列程序的功能是计算sum=1+(1+3)+(1+3+5)+……+(1+3+5+……+39)Private Sub Command34_Click()t=0m=1sum=0Dot=t+msum=sum+tm=_______Loop While m=39MsgBox“Sum”＆Sum ．End Sub为保证程序正确完成上述功能，空白处应填人的语句是A．m+1B．m+2C．t+1D．t+2
考题
以下能够正确计算1+2+3+…+10的程序是( )A.PrivateSubCommand1_Click()Sum=0ForC=1To10Sum=Sum+1NextCPrintSumEndSubB.PrivateSubCommand1_Click()Sum=0,C=1DoWhileC=10Sum=Sum+1C=C+1LoopPrintSumEndSubC.PrivateSubCommand1_Click()Sum=0;C=1DoSum=Sum+1C=C+1LoopWhileC10PrintSumEndSubD.PrivateSubCommand1_Click()Sum=0;C=1DoSum=Sum+1C=C+1LoopWhileC10PrintSumEndSub
考题
以下程序的运行结果是()。main(){inti=1,sum=0;while(i10)sum=sum+1;i++;printf(“i=%d,sum=%d“,i,sum);}A、i=10,sum=9B、i=9,sum=9C、i=2,sum=1D、运行出现错误
考题
在窗体上添加一个命令按钮，名称为Command1，然后编写如下程序：Private Sub Command1_Click()sum=0For i=1 To 100 step 2sum=sum+iNext iMsgBox sumEnd Sub打开窗体运行后，单击命令按钮，则消息框的输出结果为_______。
考题
阅读下列程序： Function func(n As Integer)As Integer Sum = 0 For i = 1 To n Sum = Sum + (i + 1)* i Next i func = Sum End Function.Private Sub Command1_Click () Dim a As Integer a= 5 s = func (A)Print s End Sub 程序运行后，单击命令按钮，输出的结果为A．80B．60C．70D．15
考题
有以下程序:include void sum(int a[ ] ){a[0]=a[－1] ＋a[1];}main ( ){int a[10] = {
有以下程序:#include ＜stdio, h＞void sum(int a[ ] ){ a[0]=a[-1] +a[1];}main ( ){ int a[10] = {1,2,3,4,5,6,7,8,9,10}; sum(a[2]); prinff("% d \n",a[2]); }程序运行后的输出结果是( )。A．6B．7C．5D．8
考题
设有如下程序 Private Sub Command1_Click( ． Dim sum As Double, x As Double sum = 0 n = 0 For i=1 To 5 x = n / i n = n + 1 sum = sum + x Next i End Sub 该程序通过For循环来计算一个表达式的值，这个表达式是A.1+1/2+2/3+3/4+4/5B.1+1/2+1/3+1/4+1/5C.1/2+2/3+3/4+4/5D.1/2+1/3+1/4+1/5
考题
设有如下程序： Private Sub Command1_ Click() Dim sum As Double, x As Double sum=0 n=0 For i=1 To 3 x=n/i n=n+1 sum=sum+x Next i End Sub 该程序通过For循环来计算sum的值，sum值的精确结果是( )。A．1+1/2+2/3B．1+1/2+1/3+1C．1/2+2/3D．1/2+1/3
考题
在窗体中有一个命令按钮(名称为run34)，对应的事件代码如下： Private Sub run34_Click() Sum=0 For i=10 To 1 Step -2 sum＝sum+i Next i MsgBox sum End Sub运行以上事件，程序的输出结果是______。A．10B．30C．55D．其他结果
考题
以下C程序的运行结果为______。main(){ int i=1，sum=0； loop：if(i＜=10) { sum+=i； i++； goto loop； } printf("sum=%d\n"，sum)；}A．sum=10B．sum=55C．sum=100D．sum=88
考题
在窗体上画一个名称为 Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a(4)As Integer, x As Integer, sum As Integer n = 4: sum = 0 a (1) = 1 For k = 0 To n - 1 For i = 1 To k + 1 x = k + 2 - i a(x)= a(x)+ a(x - 1) If x ＜ n - k Then Exit For sum = sum + a(x) Next i Next k Print sum End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是A．5B．6C．8D．11
考题
已知在4行3列的全局数组score(4，3)中存放了4个学生3门课程的考试成绩(均为整数)，现需要计算每个学生的总分，某人编写程序如下： Option Base 1 Private Sub Command1_Click() Dim sum As Integer sum=0 For i=1 To 4 For j=1 To 3 sum=sum+score(i，j) Next j Print "第" i "个学生的总分是:"；sum Next i End Sub 运行此程序时发现，除第1个人的总分计算正确外，其他人的总分都是错误的，程序需要修改。下列修改方案中正确的是( )。A．把外层循环语句For i=1 To 4 改为 For i=1 To 3 内层循环语句For j=1 To 3改为For j=1 To 4B．把sum=0移到For i=1 To 4和For j=1 To 3之间C．把sum=sam+score(i，j)改为sum=sum+score(j，i)D．把sum=sum+score(i，j)改为sam=score(i，j)
考题
设有如下程序： Private Sub Command1_Click() Dim sum As Double，x As Double sum=0 n=0 For i=1 To 5 x=n/i n=n+1 sum=sum+x Next End Sub 该程序通过For循环计算一个表达式的值，这个表达式是 ______。A．1+1/2+2/3/4+4/5B．1+1/2+2/3+3/4C．1/2+2/3+3/4+4/5D．1+1/2+1/3+1/4+1/5
考题
有如下程序： Private Sub Form_Click( ) Dim i As Integer, Sum As Integer Sum = 0 For i = 2 To 10 If i Mod 2=0 And i Mod 3＜＞0 Then Sum = Sum + i End If Next Print Sum End Sub 程序运行后，单击窗体，输出结果为A．12B．30C．24D．18
考题
有如下程序： Option Base 1 Private Sub Form. Click() Dim arr,Sum Sum=0 alt=Array(1,3,5,7,9,11,13,15,17,19) For i=1 To 10 If arr(i)/3=arr(i)\3 Then Sum=Sum+arr(i) End If Next i Print Sum End Sub 程序运行后，单击窗体，输出结果为______。A． 25B．26C．27D．28
考题
以下能够正确计算1+2+3+…+10的程序是A．Private Sub Command1_Click() Sum=0 ForI=1 To 10 Sum=Sum+I Next I Print Sum End SubB．Private Sub Command1_Click() Sum=0，I=1 Do While I＜=10 Sum=Sum+I I=I+1 Print Sum End SubC．Private Sub Command1_Click() Sum=0： I=1 Do Sum=Sum+I I=I+1 Loop While I＜10 Print Sum End SubD．Private Sub Command1_Click() Sum=0： I=1 Do Sum=Sum+I I=I+1 Loop Until I＜10 Print Sum End Sub
考题
在窗体中有一个命令按钮(名称为run1)，对应的事件代码如下： Private Sub rum_Click() suln=0 For i=10 To 1 Step-2 sum=Sum+i Next i MsgBox sum End Sub 运行以上事件，程序的输出结果是( )。A．10B．30C．55D．其他结果
考题
在窗体中添加1个命令按钮(其Name属性为Command1)和1个标签(其Name属性为Lable1)，然后编写如下代码： Private Sub Commandl_Cliek() Dim arrayl(10, 10)As Integer Dim i, j, Sum AsInteger Sum＝0 For i=1 To 10 Forj=1 To 10 arrayl(i, j)=i+j Nextj Next i End Sub 此程序的功能是求数组arrayl主对角线元素的和，并把结果显示在标签中，为实现此功能，省略号处的程序段应该是 ( )A．For i=1 To 10 For j=1 To 10 If i=j Then Sum = Sum+ arrayl (i,j) End If Next j Next i Labelt. Caption=SumB．For i=l TO 10 Forj=1 To 10 If i= =j Then Sum=Sum+array1 (i,j) End If Next j Next i Labell. Caption=SumC．For i=1 To 10 For j=1 To l0 If i=j Then Sum=Sum+arrayl (i,j) End If Next i Next j Lahell. Caption=SumD．For i=1 To 10 For j=1 To l0 If i=j Then Sum=arrayl (i,j) End If Next j Next i Labell. Caption=Sum
考题
在窗体上画一个命令按钮，名称为Command1。然后编写如下事件过程： Private Sub Command1_Click() x=11 Sum=0 For i=1 To x n=Iif(i＞5, 1, 2) Sum=Sum+n Next i Print Sum End Sub 运行后的输出结果是______。A．16B．11C．5D．2
考题
下列程序运行后的输出结果是______。Private Sub f(k，s)s=1For j=1 To ks=s*jNextEnd SubPrivate Sub Command1_Click()Sum=0For i=1 To 3Call f(i，s)Sum=Sum+sNextPrint SumEnd Sub
考题
（34）下列程序的功能是计算sum=1+(1+3)+(1+3+5)+……+(1+3+5+……+39)Private Sub Command34_Click()t=0m=1sum=0Dot=t+msum=sum+tm=Loop While m=39MsgBox "Sum="sumEnd Sub为保证程序正确完成上述功能，空白处应填入的语句是A）m+1B）m+2C）t+1D）t+2
考题
以下程序段的执行结果是______。int s=0,i=1;do{ S+=i++;}while(i＜=10);Console.WriteLine("sum={0}",sum);
A.sum=54
B.sum=1
C.sum=55
D.sum=30
考题
已经int i；int sum=0，要求求1加到10的和，能完成此操作的程序段正确的是（）。A、for（i=1；i10；i++）sum+=i；B、for（i=1；i11；i++）sum=i；C、for（i=1；i=10；i++）sum=sum+i；D、for（i=0；i=20；i++）sum+=i；
热门标签
最新试卷