问题描述:山顶上共有10个洞,一只兔子和一只狐狸相遇了,狐狸要吃兔子。兔子对狐狸说:“你可以吃掉我,但必须先找到我。我就藏在这10个洞的其中一个洞中(注:第1~10个洞的编号分别为:1、2、3、4、5、6、7、8、9、0)。你先到1号洞找我,若没找到,则第二次隔一个洞找我,即3号洞;第三次隔两个洞找我,即6号洞;以后以此类推,找到就可以吃掉我。”狐狸答应了,但是狐狸进进出出100次后,也没找到兔子,请问兔子躲藏在哪个洞?

根据规则,前面5次进洞的情况如下表所示。
第i次进洞 | 洞的实际编号 |
1 | 1 |
2 | 3 |
3 | 6 |
4 | 0 |
5 | 5 |
…… | …… |
解决此问题的VB程序界面如右图所示,单击“运行”按钮,在列表框List1中显示兔子可能躲藏的山洞编号。
模拟上述过程的VB程序代码如下。
Private Sub Run_Click()
Dim i As Integer , k As Integer
Dim hole(0 To 9) As Boolean 'hole(0)表示第10号洞
For i = 0 To 9
hole(i) = True
Next i
k= ①
For i = 1 To 100
k = k + i
hole(k Mod 10) = False
Next i
For i = 0 To 9 If ② Then List1.AddItem Str(i) '输出兔子可能躲藏的洞(编号) Next i |
End Sub
(1)结合程序设计界面和代码,可知“运行”按钮的对象名为
(2)程序中划线①处应填入
(3)狐狸第10次所进洞的编号是

同类型试题

y = sin x, x∈R, y∈[–1,1],周期为2π,函数图像以 x = (π/2) + kπ 为对称轴
y = arcsin x, x∈[–1,1], y∈[–π/2,π/2]
sin x = 0 ←→ arcsin x = 0
sin x = 1/2 ←→ arcsin x = π/6
sin x = √2/2 ←→ arcsin x = π/4
sin x = 1 ←→ arcsin x = π/2


y = sin x, x∈R, y∈[–1,1],周期为2π,函数图像以 x = (π/2) + kπ 为对称轴
y = arcsin x, x∈[–1,1], y∈[–π/2,π/2]
sin x = 0 ←→ arcsin x = 0
sin x = 1/2 ←→ arcsin x = π/6
sin x = √2/2 ←→ arcsin x = π/4
sin x = 1 ←→ arcsin x = π/2

