• 洛谷 1996——约瑟夫问题(线性数据结构)


    题目背景

    约瑟夫是一个无聊的人!!!

    题目描述

    n个人(n<=100)围成一圈,从第一个人开始报数,数到m的人出列,再由下一个人重新从1开始报数,数到m的人再出圈,……依次类推,直到所有的人都出圈,请输出依次出圈人的编号.

    输入输出格式

    输入格式:
    n m

    输出格式:
    出圈的编号

    输入输出样例

    输入样例#1:
    10 3
    输出样例#1:
    3 6 9 2 7 1 8 5 10 4


    运用公式dq:=(dq+m-1-1) mod (n-out)+1;(dp为上一次的位置,out为第几次出圈),然后输出a[dp]。最后将dp+1到n-out-1的数都向前移一位。


    代码如下:

    var
      a:array[1..10000] of longint;
      n,m,out,i,dq:longint;
    begin
      readln(n,m);
      out:=0;
      dq:=1;
      for i:=1 to n do
        a[i]:=i;
      while out<n do
      begin
        dq:=(dq+m-1-1) mod (n-out)+1;
        write(a[dq],' ');
        for i:=dq to n-out-1 do
          a[i]:=a[i+1];
        inc(out);
      end;
    end.
  • 相关阅读:
    资源与锁
    资源与锁
    Leetcode-Rotate List
    Leetcode-Unique Paths II
    Leetcode-Unique Paths
    Leetcode-Minimum Path Sum
    Leetcode-Sqrt(x)
    Leetcode-Set Matrix Zeroes
    Leetcode-Search a 2D Matrix
    Leetcode-Combinations
  • 原文地址:https://www.cnblogs.com/Comfortable/p/8412410.html
Copyright © 2020-2023  润新知