约瑟夫问题

最新推荐文章于 2022-09-13 21:59:59 发布

原创最新推荐文章于 2022-09-13 21:59:59 发布 · 409 阅读

0 ·

CC 4.0 BY-SA版权

洛谷试炼场普及组专栏收录该内容

44 篇文章

订阅专栏

本文解析了一个经典的约瑟夫环问题，通过编程的方式展示了如何计算特定规则下人们依次出圈的顺序。输入包括参与人数及计数间隔，输出则是根据规则计算得到的出圈顺序。

题目背景
约瑟夫是一个无聊的人！！！

题目描述
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,k,j:longint;
  a,b:array[0..100005]of longint;
begin
  readln(n,m);
  for i:=1 to n do
  begin
    a[i]:=i; b[i]:=i+1;
  end;
  b[n]:=1; k:=n;
  for i:=1 to n do
  begin
    for j:=1 to m-1 do 
      k:=b[k];
    write(a[b[k]],' ');
    b[k]:=b[b[k]];
  end;
end.