基数排序

//----------------------------------------------
//              Author      :心海
//              Date          :2013-11-26
//              Blog          :http://blog.sina.com.cn/u/2116533530
//              Copyright :anyone
//              PS              :欢迎拍砖、指正。一起学习，共同进步。
//-----------------------------------------------

//堆排序问题
#include<stdio.h>
#include<stdlib.h>
#include<math.h>
#include<time.h>

//显示函数
//d控制位数，d<9
void Display(int *A,int n,int d)
{     
      int i;
      char ch[4];
      ch[0]='%';
      ch[1]=(char)(d+48+1);
      ch[2]='d';
      ch[3]='\0';
      for(i=0;i<n;i++)
      {
            printf(ch,A[i]);
            if((i+1)==0)
                  printf("\n");
      }
      printf("\n\n");
}

//基数排序
//A待排数组，n数组长度,d元素位数
void RadixSort(int *A,int n,int d)
{
      int *p[10];            //指针数组
      int a[10];            //数组
      int pp,i,j,k,m,q,reminder,count;
      for(pp=0;pp<d;pp++)
      {
            for(i=0;i<10;i++)
            {      a[i] = 1;
                  count = (unsigned)sizeof(int) * a[i];
                  p[i] = (int*)malloc(count);
            }

            for(j=0;j<n;j++)
            {
                  reminder = ((double)A[j])/pow(10,pp);
                  reminder = reminder;                  //得到倒数第i位的数值
                  switch(reminder)
                  {
                  case 1:
                        a[1]+=1;
                        p[1] = (int*)realloc(p[1],sizeof(int)*a[1]);
                        p[1][a[1]-2] = A[j];
                        break;
                  case 2:
                        a[2]+=1;
                        p[2] = (int*)realloc(p[2],sizeof(int)*a[2]);
                        p[2][a[2]-2] = A[j];
                        break;
                  case 3:
                        a[3]+=1;
                        p[3] = (int*)realloc(p[3],sizeof(int)*a[3]);
                        p[3][a[3]-2] = A[j];
                        break;
                  case 4:
                        a[4]+=1;
                        p[4] = (int*)realloc(p[4],sizeof(int)*a[4]);
                        p[4][a[4]-2] = A[j];
                        break;
                  case 5:
                        a[5]+=1;
                        p[5] = (int*)realloc(p[5],sizeof(int)*a[5]);
                        p[5][a[5]-2] = A[j];
                        break;
                  case 6:
                        a[6]+=1;
                        p[6] = (int*)realloc(p[6],sizeof(int)*a[6]);
                        p[6][a[6]-2] = A[j];
                        break;
                  case 7:
                        a[7]+=1;
                        p[7] = (int*)realloc(p[7],sizeof(int)*a[7]);
                        p[7][a[7]-2] = A[j];
                        break;
                  case 8:
                        a[8]+=1;
                        p[8] = (int*)realloc(p[8],sizeof(int)*a[8]);
                        p[8][a[8]-2] = A[j];
                        break;
                  case 9:
                        a[9]+=1;
                        p[9] = (int*)realloc(p[9],sizeof(int)*a[9]);
                        p[9][a[9]-2] = A[j];
                        break;
                  default:
                        a[0]+=1;
                        p[0] = (int*)realloc(p[0],sizeof(int)*a[0]);
                        p[0][a[0]-2] = A[j];
                  }
            }

            for(q=0,k=0;q<10;q++)
            {
                  for(m=0;m< a[q]-1;m++)
                        A[k++] = *(p[q]+m);
            }
            printf("\n\t\t中间输出结果:\n");
            Display(A,n,d);
      }
}

int main()
{
      int *A;
      int n,i,d,depthMax;
      printf("请输入数组长度,数据位数: ");
      scanf("%d%d",&n,&d);
      depthMax = (int)pow(10,d) - 1;
      A = (int*)malloc((unsigned)(sizeof(int)*n));
      srand((unsigned)time(NULL));
      for(i=0;i<n;i++)
            A[i] = rand()�pthMax;

 
      Display(A,n,d);
      RadixSort(A,n,d);
      printf("\n\n\t\t最终输出结果: \n");
      Display(A,n,d);
      return 0;

}