更多“有如下VB程序段：L = 0: R = 7: i = 1Do…”相关的问题
第1题
有如下VB程序段：For i ＝ 1 To 100 j ＝ 1∶a（j） ＝ a（j） ＋ 1 Do While a（j） ＝ 6a（j） ＝ 0j ＝ j ＋ 1a（j） ＝ a（j） ＋ 1 LoopNext i数组a中各个元素值均为0，该程序段执行后数组a中各元素之和为（）
点击查看答案
第2题
有如下VB程序段:c = 0 :i = 1Do While i <=6 k = i For j = i + 1 To 7 If a（j）<= a（k） Then k = j Next j If a（i） <> a（k） Then t = a（i）: a（i） = a（k）: a（k） = t c = c + 1 End If i = i + 1Loop数组元素a（1）到a（7）的值依次为“9,9,8,16,45,9,78”。该程序段执行后,变量c的值是（）
点击查看答案
第3题
有如下VB程序段:a（1） = 1For i = 2 To 6 Randomize a（i） = a（i - 1） + Int（Rnd * 5 + 1） If a（i） Mod 2 = 1 Then a（i） = a（i） \ 2 + 1 Else a（i） = a（i） / 2 End IfNext i执行程序后,a数组各元素可能是（）
A.1 3 4 6 7 9
B.1 2 0 3 5 6
C.1 2 3 4 5 4
D.1 3 4 5 1 1
点击查看答案
第4题
有如下VB程序段：a = 3b = 2If a**2> b**3 Thena = b + 3End If该程序段运行后，变量a的值为（）
点击查看答案
第5题
有如下VB程序段：s=0For i=1 To 5S=s+1Next i该程序段执行后,i和s的值分别为（）
点击查看答案
第6题
有如下VB程序段：Dim c As String, a As Booleana = FalseIf Not a Then c = Chr（Asc（"A"） + 2） Else c = Chr（Asc（"A"） + 3）该程序段执行后，变量c的值为（）
点击查看答案
第7题
有如下VB 程序段：k-1 : s=0DoWhilek<=3S=S + kK=k + 1Loop该程序段执行后,变量k和s的值分别是（）
点击查看答案
第8题
某二分查找程序，其VB代码如下：m ＝ Int（Rnd*20） ＋ 1s ＝ 1∶t ＝ 10∶str1＝＂＂Do While s < t If a（s） ＋ a（t） ＝ m Thenleft ＝ a（s）right ＝ a（t）s ＝ s ＋ 1t ＝ t － 1 ElseIf a（s） ＋ a（t） < m Thens ＝ s ＋ 1∶str1 ＝ str1 ＋ ＂R＂ Elset ＝ t － 1∶str1 ＝ str1 ＋ ＂ L ＂ End IfLoop数组元素a（1）到a（10）的值依次为“1,4,4,5,5,6,7,8,8,9”，则str1的值不可能是（）
A.LLLLLLLLLL
B.LLR
C.RLLLR
D.RRRRRRRRR
点击查看答案
第9题
有如下VB程序段：s ＝ 0For i ＝ 1 To 15s ＝ s ＋ i Mod 2Next iLabel1.Caption ＝ Str（s）该程序运行后，在标签Label1中显示的是（）
点击查看答案
第10题
有如下VB程序段Dim x As Integer, y As Integerx = 2: y = 4If x = y Then x = x + 2 Else y = y + 2该程序段运行后x，y的值为（）
点击查看答案
题目内容
（请给出正确答案）
答案
如果结果不匹配，请 联系老师 获取答案
