试题 试卷
题型：单选题 题类：常考题 难易度：普通
浙江省杭州市五县七校2016-2017学年高二上学期期中联考信息技术试题
Dim j As Integer, k As Integer
List Clear
For k = 1 To 100
j = Int(Sqr(k))
If j * j = k Then list1.AddItem Str(k)
Next k
分析程序功能，该程序的功能是（ ）
图a
图b为标准ASCII码表供你参考（其中ASCII为1-32,127的字符为特殊符号，不能用作密码）：
图b
实现上述功能的VB程序代码如下，请回答以下问题：
Dim i As Integer, Sum As Integer
Dim a(1 To 11) As Integer
Sum = 6
a(11) = 49
For i = 10 To 1 Step -1
a(i) = a(i + 1) - 1
If a(i) Mod 3 = 0 Then Sum = Sum + a(i)
Next i
Text1.Text = Str(Sum)
该程序段运行后，文本框text1中显示的内容是（ ）
执行这部分流程后，变量a的值是（ ）
Dim a As Integer, b As Integer, c As Integer
a = 20
b = 0
c = 2
Do While a > b And a > c
b = b + 1
c = c + b
Loop
问：该程序段运行后，
在这个算法中，最多有几次猜价机会（ ）
试题篮
