从离地500米的空中自由落下一个小球，求从开始落下的时刻起，小球在最后1秒内的位移（重力加速度g以9.8米/秒2计）。程序如下，回答以下问题。
import math
h = 500
g = 9.8
t = math.sqrt（2*h/g）
hx = g*（t-1）*（-1）/2
hh = h-hx
print（“小球最后1秒下落的位移是：”，hh，“m”）
（1）该程序代码中使用了库，库的名称是_____。
A.Limport B.math C.sqrt D.print
（2）该程序代码中使用了常量，它的名称是_____。
A.h B.t C.500 D.hh
（3）该程序代码中使用了变量hh，它的数据类型是_____。
A.int B.float C.列表 D.字符串
（4）该程序中print（“小球最后1秒下客的位移是：”，hh，“m”），其中“m”的数据类型是_____。
A.int B.float C.列表 D.字符串
（5）该程序使用了物理公式计算空中自由落下个小球的位移，采用的算法处_____。
A.解析算法 B.穷举算法 C.递归法 D.选择排序

“水仙花数”就是一个 n（n≥3）位的自然数，它的每个位上的数字的 n 次幂之和等于
它本身。如 153=1³+5³+3³。在编写 VB 程序验证某个三位数 x 是否是“水仙花数”的
过程中要提取出这个数的个位、十位、百位分别存储在变量 a、b、c 中，以下语句能
够用来提取十位上的数的是

A．b="x\10" mod 10	B．b=x\100
C．b="x/100" mod 10	D．b="x" mod 10

在数组变量A中，A（1）、A（2）、…、A(10依次放了1号、2号、…、10号同学的成绩，下面一段程序的功能是实现反次序在列表框list1中输出这10个同学成绩，即输出次序为： A（10）、A（9）、…、A(1)， 程序段如下：
Dim A(-20 To 20) As Integer
for i=① to ② step ③
List1.AddItem A( ④ )
Next i
上程序中的①,②,③,④依次填入有下面几个可能答案：
（1）、 10，  1，  -1， i
（2）、  1， 10，  1， 11-i
（3）、 -5，  4,    1,  5-i
（4）、0.2,   2,  0.2,  11-i/0.2
上面答案中，正确的有（  ）

A．1个

B．2个

C．3个

D．4个

在Visual Basic中，执行语句x=Asc(Chr(Abs(-70)))，则变量x的数据类型是 （  ）

A．实数型

B．字符型

C．整数型

D．逻辑型

在VB中定义一个变量，其取值范围为1到100的整数，应将该变量数据类型定义为 (   )

A．String

B．Integer

C．Boolean

D．Date