约瑟夫环问题

3.约瑟夫环问题

#include<stdio.h>
#include<stdlib.h>
#define  MAXSIZE  30
typedef int DataType;

typedef  struct  node 
{   
    DataType  data[MAXSIZE];
    int  length;
} SeqList,* PSeqList;
//typedef SeqList* PSeqList;


PSeqList  Init_SeqList( );
PSeqList  Create_SeqList(PSeqList PL);
int josephus_SeqList (PSeqList  josephus_seq, int s, int m);
int Delete_SeqList(PSeqList PL,int i);
Print_SeqList(PSeqList PL);

main()
{
   int t=1;
   int s,m;
   int op;
   //DataType x;
   //int flag;
   //int l;
   PSeqList PL;
   
         
   while(t)
       {
            printf("



");
            printf("			---顺序表---
");
            printf("
			*******************************************");
            printf("
			*          1---初始化及创建               *");
            printf("
			*          2---约瑟夫环                   *");            
            printf("
			*          0---退     出                  *");
            printf("
			*******************************************");
            printf("			请选择菜单号(0--2):");
            scanf("%d",&op);
            switch(op)
            {
   
                case 1:
                    PL=Init_SeqList();//初始化顺序表
                    PL=Create_SeqList(PL);
                    printf("新创建的顺序表为:
");
                    Print_SeqList(PL);
                    break;
                    
                case 2:
                    printf("请输入s和m的值:
");
                    scanf("%d,%d",&s,&m);
                    josephus_SeqList (PL, s, m);

                    
                    break;

                
                case 0:
                      t=0;
                      printf("
			程序结束!
");
                      break;
          
                default: 
                    printf("
				输入错误!请重新输入!
");
                    break;

              }
                   
        }


}



PSeqList  Init_SeqList(void)
{  /*创建一顺序表，入口参数无，返回一个指向顺序表的指针，指针值为零表示分配空间失败*/
   PSeqList  PL;
   PL=( PSeqList )malloc(sizeof(SeqList)); 
   if (PL)       /*若PL=0表示分配失败*/
        PL->length=0;     
   return (PL);
} 

PSeqList  Create_SeqList(PSeqList PL)
{
       int i,n;
       printf("请输入需初始化的元素个数
");
       scanf("%d",&n);
       printf("请输入%d个整数，中间用空格隔开:
",n);
       for(i=0;i<n;i++)//输入10个整数
       { 
           scanf("%d",&PL->data[i]);
           PL->length++; 
       }
       return (PL);


}

int josephus_SeqList (PSeqList  josephus_seq, int s, int m)
{  
    int s1,i,w;
    if (!josephus_seq->length)
    {
         printf("表中无元素"); 
         return (0);
    }
    s1=s-1;   /*data数组中下标从0开始*/
    printf("输出约瑟夫序列：");
   
    for(i=josephus_seq->length; i>0; i--)
    {  
       s1=(s1+m-1)%i;   /*找到出列元素的下标*/
       w=josephus_seq->data[s1];
       printf("%d	", w);
       Delete_SeqList(josephus_seq,s1+1);  //
    } 
    return(1);//
}


int Delete_SeqList(PSeqList PL,int i)
{  /*顺序表删除，入口参数：顺序表指针，删除元素位置，返回标志1表示成功，0表示删除位置不合法，-1表示表不存在*/
    int  j;
    if (! PL)
    { 
       printf("表不存在"); 
       return(-1);    /*表不存在，不能删除元素*/
    }
    if(i<1 || i> PL -> length)  /*检查删除位置的合法性*/
    {  
        printf ("删除位置不合法"); 
        return(0);
    } 
    //*x= PL ->data[i-1];
    for(j=i;j< PL -> length; j++)
         PL ->data[j-1]=PL ->data[j];    //向上移动
    PL-> length --;    
    return (1);        /*删除成功*/
}


Print_SeqList(PSeqList PL)
{
    int i;
    if(!PL)
    {
        printf("无此顺序表");
        return -1;
    }
    if(PL->length==0)
    {
        printf("空表");
        return 0;
    }

    printf("顺序表的长度为%d
",PL->length);
    printf("顺序表的各元素值为：");
    for(i=0;i<=PL->length-1;i++)
        printf("%4d",PL->data[i]);
    return 1;

}