/*编号为1 ，2 ，3 ，… ，n 的n 个人按顺时针方向围坐一圈，每人持有一个密码
 （正整数）。一开始任选一个正整数作为报数上限值m ，从第一个人开始按顺时针方
 向自1 开始顺序报数，报到m 时停止报数。报m 的人出列，将他的密码作为新的m 值，
 从他在顺时针方向上的下一个人开始重新从1 报数，如此下去，直到所有人全部出列为止。
 试设计一个程序求出出列顺序。 */

/*%********************************************************<算法分析>**********************************************************
一.总体思想:运用单链表,每个结点中有密码和自己的编号.
 1.定义结构体,包含人的密码,编号和指向下一个结构体的指针
 2.创建链表,根据输入和上面定义的结构体.以m为密码开始,用%求的余数作为要删除的结点的位置
     并带回删除的结点的密码作为新的m,输出编号.
 3.由此得到一个新的链表,整理此链表,(除了删除首尾结点),使被删除结点的后一结点作为首结点(空head不认为是首结点),
     而其前一结点作为尾结点.
 4.新的m做2,3的动作,以此循环n-1次,最后一个由head直接输出.
二.程序的问题
 1.对有的输入,不能得出正确结果,情况没有考虑全,也许算法本身有缺陷.
 
 2.对输入的数没有作是否是整型的判断,默认是整型.
 3.有些输入运行出错.

//******************************程序**********************************
#include<stdio.h>
#include<stdlib.h>
int M,N;
#define NULL 0
struct person
{
    int data;
    int code;
    struct person *next;
};
//创建链表
struct person *create(int n)
{
    struct person *p1,*p2,*head;
    int i;
    p1=p2=(struct person*)malloc(sizeof(struct person));
    head=p1;
    p1->data=1;
    p1->code=rand();
   
    for(i=2;i<=N;i++)
    {   
        p1=(struct person*)malloc(sizeof(struct person));
        p1->data=i;
        p1->code=rand();
        p2->next=p1;
        p2=p1;
    }
 p2->next=NULL;
    return (head);
}
//输出链表
    void print(struct person *head)
    {
        struct person *p=head;
        do
        {   
            printf("%6d号,密码%6d\n",p->data,p->code);
            p=p->next;
        }while(p);
    }
//查找从下一个开始第m-1个节点
struct person *find(struct person *head,struct person *p0,int m)
{
    struct person *p1;
    int i;
    p1=p0;
    for(i=1;i<=m-1;i++)
    { p1=p1->next;
  if(p1==NULL)
  p1=head;
 }
    return(p1);
}
//删除p后一个节点并释放节点
     void dele(struct person *head,struct person *p)
    { struct person *p0;
  p0=p->next;
        p->next=p0->next;
        free(p0);
    }

//约瑟夫环问题
    void main()
    {
  //创建链表
  struct person *head,*p,*p0;
  int i=1;
  printf("输入人数N:");
  scanf("%d",&N);
  printf("\n输入第一次报数M:");
  scanf("%d",&M);
  printf("\n");
  head=create(N);
  print(hea