约瑟夫环问题

/*
 * 约瑟夫环
 * 编号为1,2，.....，n的n个人按顺时针方向围坐一圈，每人持有一个密码(正整数)。一开始人选一个正整数
 * 作为报数上限值m，从第一个人开始按顺时针方向自1开始顺序报数，报到m时停止报数。报m的人出列，将他的
 * 密码作为新的m值，从他在顺时针方向上的下一个人开始重新从1报数，如此下去，直至所有人全部出列为止。
 * 试设计一个程序求出出列顺序。
 * 2018.10.2 fang
*/
#include <stdio.h>
#include <malloc.h>
#include <stdlib.h>
#include <windows.h>

void Joseph(int n,int m);
typedef struct LNode{
    int M;      //当前出局人的编号
    int Password;       //当前出局人所带的密码
    struct LNode *next;
}JosephNode;

int main() {
    while (1) {
        int n, m, s;
        printf("\t\t\t\t\t********约瑟夫环问题*********\n");
        printf("\t1.请输入参加的人数(n)：");
        scanf("%d", &n);
        if(n<1){
            printf("**************参加人数(n)输入了不适合的值，请重新输入(Enter).");
            getchar();getchar();
            system("cls");
            continue;
        }
        printf("\t2.请输入起始报数的上限值(m)：");
        scanf("%d", &m);
        if(m<1){
            printf("**************起始报数上限值(m)输入了不适合的值，请重新输入(Enter).");
            getchar();getchar();
            system("cls");
            continue;
        }
        Joseph(n, m);
        printf("\t请问是否进入下一轮？\n\t\t（yes--1/no--0）");
        scanf("%d",&s);
        if(s==0){
            printf("\n\t退出循环...........");
            sleep(2);
            system("cls");
            break;
        }
        else if(s==1) {
            system("cls");
            continue;
        }
        else exit(1);
    }
    return 0;
}


void Joseph(int n,int m){
    int i,j,password;
    JosephNode *head,*p,*q,*L;
    /*第一步   录入数据，形成一条链*/
    head = p = (JosephNode *)malloc(sizeof(JosephNode));
    for (i = 1; i <= n; i++) {              //n--参加人数
        q = (JosephNode *)malloc(sizeof(JosephNode));
        p->next = q;
        q->M = i;
        printf("\t请输入第%d号所带的密码：",i);
        scanf("%d",&password);
        q->Password=password;
        p=q;
    }

    /*第二步   把链首尾相连*/
    p->next = head->next;
    free(head);
    L = q->next;//L一开始指在第一个元素上面

    /*第三步   输出结果*/
    printf("\t\t\t\t出列者的编号顺序是：");
    while(p!=L){
        for(j = 1; j < m; j++){     //  m--起始报数上限值
            p = L;
            L = L->next;
        }                           //  p指在出链节点的前驱节点上，L指在出链节点上
        p->next = L->next;
        printf("%d  ",L->M);
        m = L->Password;            //  新m是出链者的密码
        free(L);
        L = p->next;
    }
    printf("%d \n",p->M);
    free(L);
}