求pascal高手做一道题

问题描述:

求pascal高手做一道题
猴子选大王:
\有M个猴子围成一圈,编号从1到M.打算从中选出一个大王.经过协商,决定选大王的规则如下:从第一个开始报数,报到N的猴子出圈,接着从出圈的下一个开始报
数…,剩下的最后一个就是大王.
要求:从键盘输入M,N,编程计算哪一个编号的猴子能成为大王.
测试数据:
当M=8 ,N=5 时,3号猴子能成为大王,出圈顺序为:5 2 8 7 1 4 6 3
第一个回答不对啊!求高手的具体程序
1个回答 分类:综合 2014-11-17

问题解答:

我来补答
var
int n, m, i, s:longint;
readln(n,m);
for i:=2 to m do
begin  
s=(s+n) mod i;
 writeln("winner is",s)
end;
end.
 
 
展开全文阅读
剩余:2000
下一页:先解十一题
也许感兴趣的知识