更多“有如下VB程序段:a(1) = 1For i = 2 To …”相关的问题
第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程序段如下: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
点击查看答案
第3题
有如下VB程序段:s=0For i=1 To 5S=s+1Next i该程序段执行后,i和s的值分别为()
点击查看答案
第4题
有如下VB程序段:s = 0For i = 1 To 15s = s + i Mod 2Next iLabel1.Caption = Str(s)该程序运行后,在标签Label1中显示的是()
点击查看答案
第5题
有如下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)的值为()
点击查看答案
第6题
有如下VB程序段:a = 3b = 2If a**2> b**3 Thena = b + 3End If该程序段运行后,变量a的值为()
点击查看答案
第7题
有如下VB程序段:Dim c As String, a As Booleana = FalseIf Not a Then c = Chr(Asc("A") + 2) Else c = Chr(Asc("A") + 3)该程序段执行后,变量c的值为()
点击查看答案
第8题
有如下VB程序段Dim x As Integer, y As Integerx = 2: y = 4If x = y Then x = x + 2 Else y = y + 2该程序段运行后x,y的值为()
点击查看答案
第9题
分析下列程序段,写出程序运行结果()s=1for n=1 to 3s=s+nprint snext
A.1 4 7
B.4 7 10
C.2 4 6
D.2 4 7
点击查看答案
第10题
某 VB 程序段如下:i = 1Do While i <= 3k = ij = i + 1Do While j <= 5If a(j) < a(k) Then k = jj = j + 1LoopIf i <> k Then t = a(i)a(i) = a(k)a(k) = tEnd Ifi = i + 1Loop数组元素a(1)到a(5)的值依次为“17,87,36,22,45”,则该程序段运行后,数组元素a(1)到a(5)的数据依次是()
A.87, 45, 36, 17, 22
B.17, 22, 36, 45, 87
C.17, 22, 36, 87, 45
D.87, 45, 17, 36, 22
点击查看答案
第11题
某VB 程序段如下:i = 1Do While i <= 3min= ij = i + 1Do While j <= 6If a(j) < a(min) Then min= jj = j + 1LoopIf i <> min Then t=a(i): a(i)=a(min): a(min)=ti = i + 1Loop数组元素a(1)到a(6)的值依次为“7, 8, 3, 9, 6, 2”,则上面程序段在运行后,数组元素a(1)到a(6)的数据依次是()
A.9, 8, 7, 3, 6, 2
B.2, 3, 6, 7, 8, 9
C.2, 3, 6, 9, 8, 7
D.9, 8, 7, 6, 3, 2
点击查看答案