提示：本文共有 981 个字，阅读大概需要 2 分钟。
山顶上共有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 hole0 To 9 As Boolean hole0表示第10号洞
For i = 0 To 9
holei = True
Next i
k=
For i = 1 To 100
k = k + i
holek Mod 10 = False
Next i
For i = 0 To 9
If Then List1.AddItem Stri 输出兔子可能躲藏的洞（编号）
Next i
End Sub
问题描述：山顶上共有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
看到此处说明本文对你还是有帮助的，关于“问题描述：山顶上共有10个洞 一只兔子和一只狐狸相遇了 狐狸要吃兔子。兔子对狐狸说”留言是大家的经验之谈相信也会对你有益，推荐继续阅读下面的相关内容，与本文相关度极高！
