7,763
社区成员
发帖
与我相关
我的任务
分享算法问题
在大航海四中有一个这样的游戏，在桌上有一堆硬币，数量为N，参与游戏的人轮流取硬币，最多一次取5个，最少一次取1个，谁取到最后一个就算赢，请设计一个算法，保证电脑在有可能的情况下总取到最后一个硬币。
...全文
请发表友善的回复…
发表回复
hsl27 2002-09-27
- 打赏
- 举报
private function getNum(N as long)as long 'N 为总数
getnum = N mod 6 ’留5+1的整数倍给对方
if getnum = 0 then ’如果条件成立，电脑不管取多少，结果一样，所以
getnum = rnd(4)+1 '电脑应当取一个1-5之间的随机数 （1加上一个 0 — 4 的随机数）
ebdif
end function
getnum = N mod 6 ’留5+1的整数倍给对方
if getnum = 0 then ’如果条件成立，电脑不管取多少，结果一样，所以
getnum = rnd(4)+1 '电脑应当取一个1-5之间的随机数 （1加上一个 0 — 4 的随机数）
ebdif
end function
danielinbiti 2002-09-27
- 打赏
- 举报
电脑能做的好像也只有保证剩下的是6的倍数
其它条件太不确定了
其它条件太不确定了
sindyzhou 2002-09-27
- 打赏
- 举报
每次盡量保証剩下6的倍數個硬币,所以
private function getNum(sum as long)as integer
getnum = sum mod 6
if getnum = 0 then
getnum = 1
end function
private function getNum(sum as long)as integer
getnum = sum mod 6
if getnum = 0 then
getnum = 1
end function
sindyzhou 2002-09-27
- 打赏
- 举报
肯定用遞歸
