下列的程序段执行后,x的值为______。Private Sub Command1_Ciick() x =0 for i =1 To 10 for j = i To 10 x=x+1 Next j Next i Print xEnd SubA.50B.55C.5D.105
下列的程序段执行后,x的值为______。Private Sub Command1_Ciick() x =0 for i =1 To 10 for j = i To 10 x=x+1 Next j Next i Print xEnd Sub
A.50
B.55
C.5
D.105
相关考题:
阅读下列的程序段:sum=0for i=1 to 3for i=i to 4for k=j to 5sum=sum+1next knext jnext I执行上面的三重循环后,sum的值为______。
有以下程序:Private Sub Form_Activate()For j=1 to 3x=3For i=l to 2x=x+6NextNextPrint xEnd Sub程序运行后,窗体上显示的结果为______。
执行以下程序段Dim i As Integer, x As Integerx = 0For i = 20 To 1 Step -2x = x + i \ 5NextPrint x后,x的值为( )。A.16B.17C.18D.19
阅读下面的程序段:a=0For i=1 To 3For j=1 To iFor k=j To 3a=a+1Next kNext jNext i执行上面的程序段后,a的值为A.3B.9C.14D.21
执行下面的程序段,x的值为 。private Sub Command1_Click()For i=1 To 5 a=a+iNext iX=Val(i)msgBox xEnd SubA.5 B.6 C.7 D.8
下列程序的执行后,X的结果为()。 Private Sub Command1_Click( ) x=0 For i=1 to 3 x=1 For j=1 to 4 x=2 For k=1 to 5 x = x + 2 Next k Next j Next i Print x End Sub A. 12B. 24C. 36D. 48
有以下程序:Private Sub Form_Activate()For j=1 to 3x=3For i=1 to 2x=x+6NextNextPrint xEnd Sub程序运行后,窗体上显示的结果为______。
下面程序段的运行结果是【 】。Option Base 1Private Sub Swap (a() As IntegFor I=1 to 10\2t=a(I)a(I)=a(10-I+1)a(10-I+1)=tNext IEnd SubPrivate Sub Form_Click()Dim x(10) As IntegerFor I=1 to 10x(I)=I*2Next ISwap x()For I=1 to 10Print x(I)Next IEnd Sub
阅读下面的程序段:a==0For i=1 To 3For j=1 To iFor k=j To 3a=a+lNext kNext jNext i执行上面的程序段后,a的值为( )。A.3B.9C.14D.21
有如下程序:Private Sub Command1_Click()j =10For i= -1 To 1 Step 0.3j =j + 1Next iPrint jEnd Sub该程序共循环【 】次,程序执行完毕后j的值是【 】。
以下能够正确计算n!的程序是A.Private Sub Command1 Click() n=5:x=1 Do x=x * I I=I + 1 Loop While I < n Print x End SubB.Private Sub Command1_Click() n=5:X=1:I=1 Do X=X*I I=I + 1 Loop While I <n Print x End SubC.Private Sub Command1_Click() n=5:X=1:I=1 Do X=X * I I=I + 1 Loop While I<=n Print X End SubD.Private Sub Command1_Click() n=5:X=1:I=1 Do x=x * I I=I + 1 Loop While I>n Print X End Sub
阅读下面的程序: Private Sub Command1_Click() For i=1 To 3 For j=1 To i For k=j To 3 x=x+1 Next k Next j Next i Print x End Sub 程序运行后,单击命令按钮,窗体上输出的结果是A.3B.9C.14D.21
执行下面的程序段,x的值为 Private Sub Commandl_Click() For i=1 To 5 a=a+i Next i x=Val(i) MsgBox x End SubA.5B.6C.7D.8
执行以下程序段Dim x As Integer,i As Integerx=0For i=20 To 1 Step-2 x=x+i\5Next i后,x的值为A.16B.17C.18D.19
以下能够正确计算n! 的程序是( )。A.Private Sub Command1_Click( ) n=5:x=l Do x=x*i i=i+1 Loop While i < n Print x End SubB.Private Sub Command1_Click( ) n=5:x=1:i=1 Do x=x*i i=i+1 Loop While i < n Print x End SubC.Private Sub Command1_Cliek( ) n:5:x=1:i=1 Do x=x* i i:i+1 Loop While i < = n Print x End SubD.Private Sub Command1_Cliek( ) n=5:x:1:i=1 Do x=x*i i=j+1 Loop While i > n Print x End Sub
下列程序用于输出一个主对角线上元素值为“*”,其他元素值为“”的5×5阶的方阵,试将程序补充完整。Private Sub Command1_Click()Dim x(5, 5)For i = 1 To 5For j = 1 To 5If ______Thenx(i, j) = '*'Else______End IfPrint ______Next jPrintNext iEnd Sub
以下能够正确计算n!的程序是______。A.Private Sub Commeadl_Click() n=5: x=1 Do x=x*i i=i+1 Loop While i<n Print x End SubB.Private Sub Command1_Click() n=5: x=1: i=1 Do x=x*i i=i+1 Loop While i<n Print x End SubC.Private Sub Command1_Click() n=5: x=1: i=1 Do x=x*i i=i+1 Loop Whilei<=n Print x End SubD.Private Sub Commsndl_Click() n=5: x=1: i=1 Do x=x*i i=i+1 Loop While i>n Print x End Sub
执行下面的程序段,x的值为 Private Sub Command1_Click( ) For i=1 To 5 a=a+i Next i x=Val(i) MsgBox x End SubA.5B.6C.7D.8
下列程序运行后的输出结果是______。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