如果一个三位正整数等于它的每个数字的立方和,则此数称为“水仙花”数(如:153=1^3+5^3+3^3)。 下列程序用于求出 100-999 之间的所有“水仙花”数。
(1)设计下列程序界面时,在窗体上添加 List1 对象,可使用下图所示 的“控件工具箱”中的 (填写相应编号)。

(2)VB 程序如下: Private Sub Command1 Click()
Dim m As Integer, n As Integer
Dim a As Integer,b As Integer,c As Integer For m =" 100" To 999
a =" Int(m/100)" b = ①   c= ②   n=a^3+b^3+c^3
If  ③ Then List1.AddItem Str(m) Next m
End Sub 在程序①、②、③划线处,填入适当的语句或表达式,把程序补充完整:
程序中①划线处应填入 。程序中②划线处应填入 。程序中③划线处应填入   
(3)该程序是 算法。(选填:枚举/解析)
当前题号:1 | 题型:填空题 | 难度:0.99
VB标准函数RND的作用是返回一个大于等于0且小于1的随机数。只能产生大于等于100且小于200随机 整数的VB表达式是 ( )
A.Int(Rnd*100) B.Int(Rnd*101+100)
C.Int(Rnd*99+100) D.Int(Rnd*100+100)
当前题号:2 | 题型:选择题 | 难度:0.99
在窗体上画一个名称为Label1的标签,然后编写如下事件过程,程序运行后,单击窗体,在标签中显示的内容是(   )
Private Sub Form_Click()
Dim arr(1 to 10, 1 to 10) As Integer
Dim i As Integer, j As Integer
For i =" 2" To 4
For j =" 2" To 4
arr(i, j) =" i" * j
Next j
Next i
Label1.Caption =" Str(arr(2," 2)+ arr(3, 3))
End Sub
(
A.12B.13C.14D.15
当前题号:3 | 题型:选择题 | 难度:0.99
兔子吃萝卜。兔子拔了一堆萝卜,第一天吃了一半,还嫌不过瘾,又吃了一个,第二天又将剩下的萝卜吃掉一半,又多吃了一个,以后每天如此。到第10天想再吃时,见只剩下一个萝卜了。求第一天共拔了多少萝卜。小明编写了一个VB程序,用于计算兔子第一天拔的萝卜总数。程序运行界面如图所示。

Private Sub Command1_Click()
Dim i As Integer,sum As Integer
sum=1
For i=9 To 1 ________
________
Next i
Text1.Text=Str(sum)
End Sub
回答下列问题:
(1)该程序采用的算法是________(填:解析算法/枚举算法)
(2)显示计算结果的控件属于________类,该控件的名称是________。
(3)划线①处应填入的语句为________。
划线②处应填入的语句为________。
当前题号:4 | 题型:填空题 | 难度:0.99
统计1~1 000间个位数是4,且能被9整除的数共有多少个,可以采用的算法是(  )
A.查找算法B.枚举算法
C.解析算法D.排序算法
当前题号:5 | 题型:选择题 | 难度:0.99
王敏的E­Mail邮箱密码忘记了,但她需要收一封很重要的来信,请你帮她尽可能找出密码。
她零星记得自己的密码信息:
①密码是六位数字,前面两位为31;
②最后两位数字相同;
③能被16和46整除。
程序界面如图所示,单击“帮助找回密码”按钮(Command1)后,可能的密码显示在列表框List1中。

解决此问题的相应程序如下:
Private Sub Command1_Click()
Dim a As Integer,s As long,b As Integer,i As Integer
For i=0 To 9 999 ①________
s=310 000+i
If s Mod 46=0 Then
②________
b=(s Mod 100)\100
If a=b Then
List1.Addltem Str(s)
End If
End If
Next i
End Sub

(1)解决此问题的算法是________(选填:枚举算法或排序算法)
在程序①和②画线处,填入适当的语句或表达式,把程序补充完整:
(2)程序中①画线处应填入________。
(3)程序中②画线处应填入________。
当前题号:6 | 题型:填空题 | 难度:0.99
某食品连锁店5位顾客贵宾消费卡的积分依次为810,512,613,700,900。采用选择排序算法对其排序,若完成第一遍时的结果为:512,810,613,700,900,则完成第二遍的结果是(  )
A.512,613,700,900,810
B.512,810,613,900,700
C.512,900,613,700,810
D.512,613,810,700,900
当前题号:7 | 题型:选择题 | 难度:0.99
求满足首尾两个数字相等的所有四位正整数之和。
(1)写出能表示“一个四位正整数X的千位数字和个位数字相等”的VB表达式
_______________________________________________________________
(2)将下列程序填写完整,求所有满足上述条件的四位正整数之和
Dim x as integer,p1 as integer,p2 as integer,s as long
S=0
Print “s=”;s
______________________________________________________________
当前题号:8 | 题型:填空题 | 难度:0.99
关于枚举算法的说法错误的是(   )
A.一般是通过循环中嵌套分支结构来实现的。
B.循环结构用来“枚举”,分支结构用于“检验”。
C.列举所有可能解的范围时,可以扩大但不能缩小,以防漏解。
D.采用枚举法时,也可能找不到符合条件的解。
当前题号:9 | 题型:选择题 | 难度:0.99
以下是两位同学设计的描述“输出所有能被3整除的四位数”的流程图。
(1)请将流程图的空缺填写完整 ①_____________ ② ____________ 
(2)请问采用枚举算法描述的是  。(从下列选项中选择)
A.图AB.图BC.都是D.都不是
当前题号:10 | 题型:填空题 | 难度:0.99