主题：求约瑟夫问题的一种解法
c*b*a
[专家分：0] 发布于 2010-02-28 17:00:00
只求一种方法
回复列表 （共4个回复）
沙发
w75317 [专家分：530] 发布于 2010-02-28 17:04:00
猴子全部设为0，出圈记1，数组为【0..N】因为如果记到了10，便可以MOD 10。
板凳
w75317 [专家分：530] 发布于 2010-02-28 17:05:00
还可以全部极为TRUE，出圈为FALSE。
3 楼
c*b*a [专家分：0] 发布于 2010-02-28 17:07:00
谢谢。不过布尔型转圈怎么办？
4 楼
w75317 [专家分：530] 发布于 2010-02-28 17:09:00
设i为计数器，不停加1，记到N+1便把i变成1。
我来回复
您所在位置：社区首页 — PASCAL语言讨论区 — 求约瑟夫问题的一种解法