#include  <stdio.h>
#include <stdlib.h>
typedef struct node             /*  結點的結構定義  */
   {  int  num;              /* 編號  */
      int  sm;               /* 密碼  */
      struct node *link;        /*指針域 */
   }JOS;
/*  生成約瑟夫環  */
JOS  *creat(int n)
{  int  i=0,j, mi;
   JOS  *neww, *pre, *h;
   h=(JOS *)malloc(sizeof(JOS));
   h->link=h;
   pre=h;

 for (j=0;j<n;j++)
   {
     printf("輸入第%d個人的密碼:",j+1);  scanf("%d",&mi);
	  neww=(JOS *)malloc(sizeof(JOS));
      i++;
	  neww->num=i;
	  neww->sm=mi;              /*  結點送值   */
      neww->link=h;
      pre->link=neww;
      pre=neww;                                  /*  形成循環鏈表   */
        }
   pre->link=h->link; free(h);                      /*  刪除頭結點h */
   h=pre->link;  return(h);     /* 頭指針指向第一個數據元素結點 */
}

void outs(JOS  *h, int m)
{
   int i;   JOS *q=h,*p;
   while (q->link!=q)
   {
	 for(i=1;i<m;i++){ p=q; q=q->link;} /*  報數到第m個人 */
     m=q->sm;        /*修改值m為第m個人的密碼*/
	 printf("%6d",q->num);        /*  輸出第m個人的編號  */
     p->link=q->link;  free(q);             /*  第m個人出列  */
     q=p->link;
   }
  printf("%6d\n",q->num);
  free(q);
} /* outs  */


/*  主函數  */
void main()
{
    int  m,n;  JOS  *h;
     printf("enter the number of people,n="); scanf("%d",&n);
   h=creat(n);
   printf("enter the begin secret code, m="); scanf("%d",&m);
   printf("the out order is:\n ");
      outs(h, m);
}  /* main  */