第16周 項目1-驗證算法（8）基數排序

/*    
* Copyright (c)2016,煙臺大學計算機與控制工程學院    
* All rights reserved.    
* 文件名稱：項目1-8.cbp    
* 作    者：臧新曉   
* 完成日期：2016年12月16日    
* 版 本 號：v1.0    
* 問題描述：驗證基數排序    
* 輸入描述：無    
* 程序輸出：測試數據    
*/      

#include <stdio.h>  
#include <malloc.h>  
#include <string.h>  
#define MAXE 20         //線性表中最多元素個數  
#define MAXR 10         //基數的最大取值  
#define MAXD 8          //關鍵字位數的最大取值  
typedef struct node  
{  
    char data[MAXD];    //記錄的關鍵字定義的字符串  
    struct node *next;  
} RecType;  
void CreaLink(RecType *&p,char *a[],int n);  
void DispLink(RecType *p);  
void RadixSort(RecType *&p,int r,int d) //實現基數排序:*p爲待排序序列鏈表指針,r爲基數,d爲關鍵字位數  
{  
    RecType *head[MAXR],*tail[MAXR],*t; //定義各鏈隊的首尾指針  
    int i,j,k;  
    for (i=0; i<=d-1; i++)                  //從低位到高位循環  
    {  
        for (j=0; j<r; j++)                 //初始化各鏈隊首、尾指針  
            head[j]=tail[j]=NULL;  
        while (p!=NULL)                 //對於原鏈表中每個結點循環  
        {  
            k=p->data[i]-'0';           //找第k個鏈隊  
            if (head[k]==NULL)          //進行分配  
            {  
                head[k]=p;  
                tail[k]=p;  
            }  
            else  
            {  
                tail[k]->next=p;  
                tail[k]=p;  
            }  
            p=p->next;                  //取下一個待排序的元素  
        }  
        p=NULL;                         //重新用p來收集所有結點  
        for (j=0; j<r; j++)             //對於每一個鏈隊循環  
            if (head[j]!=NULL)          //進行收集  
            {  
                if (p==NULL)  
                {  
                    p=head[j];  
                    t=tail[j];  
                }  
                else  
                {  
                    t->next=head[j];  
                    t=tail[j];  
                }  
            }  
        t->next=NULL;                   //最後一個結點的next域置NULL  
        //以下的顯示並非必要  
        printf("  按%d位排序\t",i);  
        DispLink(p);  
    }  
}  
void CreateLink(RecType *&p,char a[MAXE][MAXD],int n)   //採用後插法產生鏈表  
{  
    int i;  
    RecType *s,*t;  
    for (i=0; i<n; i++)  
    {  
        s=(RecType *)malloc(sizeof(RecType));  
        strcpy(s->data,a[i]);  
        if (i==0)  
        {  
            p=s;  
            t=s;  
        }  
        else  
        {  
            t->next=s;  
            t=s;  
        }  
    }  
    t->next=NULL;  
}  
void DispLink(RecType *p)   //輸出鏈表  
{  
    while (p!=NULL)  
    {  
        printf("%c%c ",p->data[1],p->data[0]);  
        p=p->next;  
    }  
    printf("\n");  
}  
int main()  
{  
    int n=10,r=10,d=2;  
    int i,j,k;  
    RecType *p;  
    char a[MAXE][MAXD];  
    int b[]= {75,23,98,44,57,12,29,64,38,82};  
    for (i=0; i<n; i++)     //將b[i]轉換成字符串  
    {  
        k=b[i];  
        for (j=0; j<d; j++) //例如b[0]=75,轉換後a[0][0]='7',a[0][1]='5'  
        {  
            a[i][j]=k%10+'0';  
            k=k/10;  
        }  
        a[i][j]='\0';  
    }  
    CreateLink(p,a,n);  
    printf("\n");  
    printf("  初始關鍵字\t");        //輸出初始關鍵字序列  
    DispLink(p);  
    RadixSort(p,10,2);  
    printf("  最終結果\t");         //輸出最終結果  
    DispLink(p);  
    printf("\n");  
    return 0;  
}