在一次学校的运动会上,高一女子100米决赛的成绩已出来，前8名的成绩记录单由于不小心丢掉一张,只剩下7 个成绩,并已按成绩排序，分别是(单位:秒)14.5，15.1，16.5，16.8，17.1，17.5，17.9，后来找到了,请将找到的成绩插入相应的位置,使数据序列仍保持有序,并求出该成绩的名次。根据已有程序段,请补齐流程图中的空格。

程序如下：
Dim a(1 To 8) As Integer
Dim n, i, j, x As Integer
Private Sub Command1_Click()
x = Val(Text2．Text)
If x > a(n) Then
i=n+1
else
i = 1
Do While x > a(i)
i =" i" + 1
Loop
End If
Text3．text=str(i)‘在文本框text3 显示名次
End Sub
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii =" 13" Then
n =" n" + 1
a(n) = Val(Text1．Text)
List1．AddItem Str(a(n))
Text1．Text = "": Text1．SetFocus ‘准备在text1 接受下一个数据
End If
End Sub

计算下列表达式的值
（1）156\10 mod 7的值是_________________
（2）12+5^2 MOD 23*3\72/2^3+1值为_________________
（3）如果变量a=2,b=3,c=4,d=5，表达式NOT a>b AND NOT d<>c的值是_________________
（4）如果变量 a=7、b=6、c=4、d=5，则表达式 a<d OR b>c AND c<>d 的值为_________________

Y为分段函数

求y的值。完成该流程图，在空白处填入_____

A．x mod 2 <> 0

B．x / 2 = 0

C．x =" 2" * n-1

D．x \ 2 = 0

在Visual Basic程序中，王老师声明一个数组用于存储班级45位学生的手机号码，下列语句中合适的是（  ）

A．Dim Tel(1 To 45) As Integer	B．Dim Tel(1 To 45) As Long
C．Dim Tel(45) As Long	D．Dim Tel(44) As String

《算法与程序设计》模块
Ⅰ.填空题：
（1）  代数式 对应的VB（或 JAVA）表达式为__________。
（2）  从数列23、11、19、17、65中找出数据19，若采用顺序查找法从左边第一个数开始查找，需要查找_____次。
（3）  在a、b2、c#这三个变量名中，不符合变量命名规则的是_____。
（4）程序的基本结构包括顺序结构、选择结构和循环结构。下列程序主要采用________结构，计算1到100之间的整数和。

Rem VB代码(部分) s=0 For i="1" To 100   s=s+i    Next I

//JAVA 代码(部分) int s=0; for (int i=1;i<=100;i++)   {  s=s+i;  }