题目背景
约瑟夫是一个无聊的人!!!
题目描述
n个人(n<=100)围成一圈,从第一个人开始报数,数到m的人出列,再由下一个人重新从1开始报数,数到m的人再出圈,……依次类推,直到所有的人都出圈,请输出依次出圈人的编号.
输入输出格式
输入格式:
n m
输出格式:
出圈的编号
输入输出样例
输入样例#1:
10 3
输出样例#1:
3 6 9 2 7 1 8 5 10 4
说明
你猜,你猜,你猜猜猜……
猜不着吧,我也不告诉你!!!
分析:就是纯模拟(猴子选大王啊),用链表快些(这估计是这个专题的)。
代码:
var
i,n,m,e,j:longint;
next,a:array[0..100005]of longint;
begin
readln(n,m);
for i:=1 to n do
begin
a[i]:=i;
next[i]:=i+1;
end;
next[n]:=1;
e:=n;
for i:=1 to n do
begin
for j:=1 to m-1 do e:=next[e];
write(a[next[e]],' ');
next[e]:=next[next[e]];
end;
end.