更多“有如下VB 程序段:s = 1For i = 2 To 10…”相关的问题
第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中,下列程序段执行后,输出的结果为()s=1For i=1 To 6 Step 2s=s*iNext iPrint s
点击查看答案
第3题
某排序算法的VB程序段如下:k = 1For i = 1 To 2For j = 1 To 6 - 2 * iIf k * a(j) < k * a(j + 2) Thent = a(j)a(j) = a(j + 2)a(j + 2) = tEnd Ifk = -kNext jNext i数组元素a(1)到a(6)的初始值依次为“15,11,58,38,26,9”,该程序段执行后,数组元素a(1)到a(6) 的值分别为()
A.58,9,26,11,15,38
B.58,38,26,11,15,9
C.15,38,26,11,58,9
D.58,38,26,15,11,9
点击查看答案
第4题
有如下VB程序段:s=0For i=1 To 5S=s+1Next i该程序段执行后,i和s的值分别为()
点击查看答案
第5题
有如下VB程序段:s = 0For i = 1 To 15s = s + i Mod 2Next iLabel1.Caption = Str(s)该程序运行后,在标签Label1中显示的是()
点击查看答案
第6题
某VB 程序段如下:i = 1: s = ""Do While i <= 3k = i j = i + 1Do While j <= 8If a(j) < a(k) Then k = jj = j + 1LoopIf i < > k Thent = a(i): a(i) = a(k): a(k) = tn = n + 1End Ifs = s + Str(a(i)) : i = i + 1LoopLabel1.Caption = Str(n) + ":" + s数组a(1)到a(8)依次为:“16, 19, 8, 20, 4, 12,6, 15”,程序运行后,标签中显示的值为()
A.2:4 6 8
B.2:8 6 4
C.3:4 6 8
D.3:8 6 4
点击查看答案
第7题
有如下VB 程序段:k-1 : s=0DoWhilek<=3S=S + kK=k + 1Loop该程序段执行后,变量k和s的值分别是()
点击查看答案
第8题
有如下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)的值为()
点击查看答案
第9题
有如下程序段:s=0;for(i=1;i<=10;i=i+4) s = s + i;该程序段运行过程中,语句s = s + i执行的次数是()
点击查看答案
第10题
有如下的Visual Basic程序段:s=0For i = 1 To 10 Step 4s = iNext i该程序段运行后,语句 s = i 执行的次数是()
点击查看答案
第11题
有如下程序段:s = 0;for(i=;i<=2;i++)s = s + i;若要使语句s = s + i执行3次,则循环变量i初值应为()
点击查看答案