（加试题）有如下VB程序段：
i = 1: j = 10：x=18
Do While i<= j
m = Int((i + j) / 2)
If x = f(m) Then  Exit Do
If x <f(m) Then  j = m - 1  Else i = m + 1
Loop
数组元素f(1)到f(10)的值依次为： 2,7,8,10,12,13,16,18,19,20，该程序段运行后，下列表达式值为True的是

A．i=m+1

B．j=m-1

C．j>m+1

D．i>m-1

某算法的流程图如图所示，执行该算法后，输出的结果是

A．5

B．20

C．40

D．50

下面是判断方程ax²+bx+c=0（a≠0）有无实根的部分算法表示，则图中虚线部分应填入

A．

B．

C．

D．

（加试题）以下 VB 程序段用插入排序的方法实现 10 个数据升序排序。
Dim tmp As Integer
Dim a(1 To 10) As Integer
Private Sub Form_Load
'随机生成 10 个不重复的数存入数组 a,代码略
End Sub
Private Sub Command1_Click
For i = 2 To 10
If a(i) < a(i- 1) Then tmp = a(i)
For j = ①     To 1 Step -1   '依次后移
If tmp > a(j) Then Exit For
②
Next j
③ '插入数据
End If
Next i End Sub 要实现上述功能，方框①②③中的语句分别是（   ）

A．i-1a(j+1)=a(j)a(j+1)=tmp

B．i-1a(j+1)=a(j)a(j)=tmp

C．10a(j)=a(j+1)a(j)=tmp

D．10a(j)=a(j+1)a(j+1)=tmp

在 VB 的算术运算中，最大的实数类型 double 有效位数也只有 15 位。为了实现除法运算保留任意位数，小明根据除法原理，编写了如下程序，功能如下：在文本框 Text1 中输入被除数（正整数） ,在文本框 Text2 中输入除数（正整数），在文本框 Text3 中输入小数位数，单击按钮 Command1，在标签 Label 中显示除法运算的商。程序运行界面如图所示，但加框处代码有错，请改正：

Private Sub Command1_Click
Dim x, y As Integer
Dim n As Integer
Dim s As String
x = Val(Text1.Text): y = Val(Text2.Text)
n = Val(Text3.Text)
s = s + Str(x \ y)
s = s + "."
k = x Mod y
For i = 1 To n

x = x+k * 10 ①________

s = Str(x \ y) ②________

 
k = x Mod y
Next i
Label1.Caption = "商为： " + s
End Sub

某算法流程图如图所示，执行这部分流程，变量 sum 的值为：

A．1

B．3

C．4

D．0

小李利用所学的 VB 知识，编写了一个简单计算器：在文本框 Text1 中输入一个加减算式（只包含数字和“ +”、“ -”符号，以“ =”结束），点击“计算”按钮 Command1，计算结果在标签 Label1 上显示。程序运行界面如下图所示：

（1）要实现程序运行时，单击文本框 Text1 即可将文本 框 清 空 ， 则 应 在 _______(A 、Command1_Click/B、 Form_Load/C、 Text1_Click)事件处理过程中添加语句 Text1.text=”” 。
（2）实现上述功能的 VB 程序如下，请在划线处填入合适的代码
Private Sub Command1_Click
Dim s As String, ch As String, sum As  Integer
Dim fh As Integer
s = Text1.Text: fh = 1: p = 0: sum=0
For i = 1 To Len(s)
ch = Mid(s, i, 1)
If ch >= "0" And ch <= "9" Then
p = ①________
Else
sum = ②________
p = 0
If ch = "-" Then
fh = -1
ElseIf ch = "+" Then
fh = 1
End If
End If
Next i
Label1.Caption = Str(sum)
End Sub
（3）若文本框 Text1 中输入的内容为“ 12*10=”（不包括双引号），单击“计算”按钮后，标签Label1 上将显示：________ .（A、 120 / B、 22 / C、 0 /D、程序出错无法显示）

下图为登入某平台的部分算法流程，若密码连续输错3次，则账号将被冻结2小时后方可操作，若密码输入正确则进入平台。要实现此功能，空白处应填入________。

机器人灭火：下图为着火点搜索范围和机器人的智能程序。黑色区域表示障碍区，不能通行；红色星状图为着火点。机器人用箭头表示，箭头方向为机器人的前进方向，机器人会按智能程序要求进行搜索，直至完成灭火任务。完成灭火任务后，输出的i值为_______________  。

有求和式，编写程序计算并输出当n=20时，s的值。