内排序的性能比较

#include<stdio.h>
#include<stdlib.h>
#include<time.h>
#define  maxsize 100
typedef  int  keytype;
typedef  struct{
keytype  key;
int other;
}recordtype;
typedef  struct{
recordtype   r[maxsize+1];
int length;
}table;
typedef struct{
int count1[8];
int count2[8];
}count;
count  t1={0};
int m=0;
int rand(void);
void show(table *);
void insertsort(table  *tab)
{  
 
 int  i,j;
 t1.count1[1]=1;
 t1.count2[1]=0;
 printf("直接插入排序：/n");
 for(i=2;i<=tab->length;i++)
 {j=i-1;
 tab->r[0]=tab->r[i];
   t1.count2[1]+=2;
    
 while(tab->r[0].key<tab->r[j].key )
 {    t1.count1[1]++;
  tab->r[j+1]=tab->r[j];
  j=j-1;
  t1.count2[1]++;
 }
 tab->r[j+1]=tab->r[0];
 printf("第%d趟:", i-1);
 show(tab);
 }
  
  printf("直接插入排序元素比较的次数为：%d,交换的次数为:%d/n",t1.count1[1],t1.count2[1]);
 
}
void binarysort(table *tab)
{   int i,j,left,right,mid;
    t1.count1[2]=1;
 t1.count2[2]=0;
 printf("二分插入排序：/n");
 for(i=2;i<=tab->length;i++)
 {
  tab->r[0]=tab->r[i];
   left=1;right=i-1;
   while(left<=right)
   {
      mid=(left+right)/2;
   if(tab->r[i].key<tab->r[mid].key )
   { right=mid-1;t1.count1[2]++;}
   else
     left=mid+1;
   }

   for(j=i-1;j>=left;j--)
   {tab->r[j+1]=tab->r[j];t1.count2[2]++;}
    tab->r[left]=tab->r[0];t1.count2[2]+=2;
 printf("第%d趟:", i-1);
 show(tab);
 }
  printf("二分插入排序元素比较的次数为：%d,交换的次数为:%d/n",t1.count1[2],t1.count2[2]);
}
void shellinsertsort(table  *tab)
{
 int i,j,d,m=0;
    t1.count1[3]=1;
 t1.count2[3]=0;
 printf("shell插入排序：/n");
 d=tab->length/2;
 while(d>=1)

 {
  for(i=d+1;i<=tab->length;i++)
  {
   tab->r[0]=tab->r[i];
   j=i-d;
   while(tab->r[0].key<tab->r[j].key && j>0)
   {    t1.count1[3]++;
    tab->r[j+d]=tab->r[j];
    j=j-d;
                 t1.count2[3]++;
   }
   tab->r[j+d]=tab->r[0];
   t1.count2[3]+=2;
  }
  d=d/2;
 printf("第%d趟:", m++);
 show(tab);
 }
  printf("shell插入排序元素比较的次数为：%d,交换的次数为:%d/n",t1.count1[3],t1.count2[3]);
}
void simplesectsort(table *tab)
{
 int i,j,k;
     t1.count1[4]=1;
  t1.count2[4]=0;
  printf("直接选择排序 ：/n");
 for(i=1;i<=tab->length-1;i++)
 {
  k=i;
  for(j=i+1;j<=tab->length;j++)
   if(tab->r[i].key>tab->r[j].key) { k=j;t1.count1[4]++;}
        if(k!=j)
  {
   tab->r[0]=tab->r[k];
   tab->r[k]=tab->r[i];
   tab->r[i]=tab->r[0];
   t1.count2[4]+=3;
  }
 printf("第%d趟:", i);
 show(tab);
 }
  printf("直接选择排序元素比较的次数为：%d,交换的次数为:%d/n",t1.count1[4],t1.count2[4]);
}

void  bubblesort(table *tab)
{
 int i,j,done;
  t1.count1[5]=1;
  t1.count2[5]=0;
  printf("冒泡排序：/n");
 i=1;done=1;
 while(i<=tab->length && done)
 {
  done=0;
  for(j=1;j<=tab->length-i;j++)
   if(tab->r[j+1].key<tab->r[j].key )
   { t1.count1[5]++;
    tab->r[0]=tab->r[j];
    tab->r[j]=tab->r[j+1];
    tab->r[j+1]=tab->r[0];
    t1.count2[5]+=3;
    done=1;
   }
 
    printf("第%d趟:", i);
 show(tab);
 i++;
 }
  printf("冒泡排序元素比较的次数为：%d,交换的次数为:%d/n",t1.count1[5],t1.count2[5]); 
}

void quicksort(table *tab,int left,int right)
{int i,j;
    
if(left<right)
{
 i=left;j=right;
 tab->r[0]=tab->r[i];
 do
 {
  while(tab->r[j].key>tab->r[0].key && i<j) {j--;t1.count1[6]++;}
  if(i<j)
  {
   tab->r[i].key=tab->r[j].key;i++; t1.count2[6]++;
  }
  while(tab->r[i].key<tab->r[0].key && i<j) {i++;t1.count1[6]++;}
  if(i<j)
  {
   tab->r[j].key=tab->r[i].key;j--;t1.count2[6]++;
  }
 }while(i!=j);
  tab->r[i]=tab->r[0];t1.count2[6]++;
  printf("第%d趟:", ++m);
     show(tab);
  quicksort(tab,left,i-1);
  quicksort(tab,i+1,right);
 }

}
void merge(table *tabs,table *tabg,int u,int m,int v)
{
 int i,j,k,t;
    
 i=u;
 j=m+1;
 k=u;
 while(i<=m && j<=v)
 {
  if(tabs->r[i].key<=tabs->r[j].key )
  {
   tabg->r[k]=tabs->r[i];i++;t1.count1[7]++;t1.count2[7]++;}
  else
  {tabg->r[k]=tabs->r[j];j++;t1.count2[7]++;}
  k++;}
 if(i<=m)
  for(t=i;t<=m;t++) {tabg->r[k+t-i]=tabs->r[t];t1.count2[7]++;}
  else
   for(t=j;t<=v;t++) {tabg->r[k+t-j]=tabs->r[t];t1.count2[7]++;}
}
void mergepass(table *tabs,table *tabg,int len)
{
 int i,j,n;
    
 n=tabg->length=tabs->length;t1.count2[7]++;
 i=1;
 while(i<=n-2*len+1)
 {
  merge(tabs,tabg,i,i+len-1,i+2*len-1);
  i=i+2*len;
 }
 if(i+len-1<n)
  merge(tabs,tabg,i,i+len-1,n);
 else
  for(j=i;j<=n;j++) {tabg->r[j]=tabs->r[j];t1.count2[7]++;}
}
void mergesort(table *tab)
{
 int len,m=0;
  table temp;
 t1.count1[7]=1;
  t1.count2[7]=0;
  printf("归并排序：/n");
 len=1;
 while(len<tab->length )
 {    
  mergepass(tab,&temp,len);
  len=2*len;
  mergepass(&temp,tab,len);
  len=2*len;
 printf("第%d趟:", m++);
 show(tab);
 }
printf("归并排序元素比较的次数为：%d,交换的次数为:%d/n",t1.count1[7],t1.count2[7]);
}

void show(table *tab)
{
 int i;
 for(i=1;i<=tab->length;i++)
  printf("%5d",tab->r[i]);
  printf("/n");
}

void insert(table *tab)
{   char ch1;
 int i;
 printf("请选择是随机生成输(y/n)?:");
  getchar();
 ch1=getchar();
 if(ch1=='y')
  for(i=1;i<=tab->length;i++)
   tab->r[i].key=1+(int)(100*rand()/(RAND_MAX+1.0));
  else
  if(ch1=='n')
  { printf("请输入这%d个正整数:",tab->length);
   for(i=1;i<=tab->length;i++)
    scanf("%d",&tab->r[i] );}
  else
  {printf("请按要求输入!!!/n");exit(1);}
 printf("/n");
}
void checkfloat(table *tab1,int ch)
{
 
 printf("请输入排序数的个数:");
 scanf("%d",&tab1->length);
  insert(tab1);
  switch(ch)
  {
  case 1:insertsort(tab1);break;
  case 2:binarysort(tab1);break;
  case 3:shellinsertsort(tab1);break;
  case 4:simplesectsort(tab1);break;
  case 5:bubblesort(tab1);break;
  case 6:
     t1.count1[6]=1;
  t1.count2[6]=0;
  printf("快速排序 ：/n");
   quicksort(tab1,1,tab1->length);
    printf("快速排序元素比较的次数为：%d,交换的次数为:%d/n",t1.count1[6],t1.count2[6]);
    m=0;break;
  case 7:mergesort(tab1);break;
  default: printf("输入错误!!!");break;
  }
 printf("排序结果为：/n");
 show(tab1);
}
void checkdouble(table *tab1)
{ table tab[7];
 int i=1;
 printf("请输入排序数的个数:");
 scanf("%d",&tab1->length);
   insert(tab1);
   for(i=1;i<=6;i++)
    tab[i]=*tab1;
 for(i=1;i<=7;i++)
  switch(i)
  {
  case 1:insertsort(tab1);break;
  case 2:binarysort(&tab[1]);break;
  case 3:shellinsertsort(&tab[2]);break;
  case 4:simplesectsort(&tab[3]);break;
  case 5:bubblesort(&tab[4]);break;
  case 6:
     t1.count1[6]=1;
  t1.count2[6]=0;
  printf("快速排序 ：/n");
   quicksort(&tab[5],1,tab1->length);
    printf("快速排序元素比较的次数为：%d,交换的次数为:%d/n",t1.count1[6],t1.count2[6]);
    m=0;break;
  case 7:mergesort(&tab[6]);break;
  default: printf("输入错误!!!");break;;
  }
 
}

void main()
{
table  *tab1;

 int ch,ch1;
tab1=(table *)malloc(sizeof(table));
printf("                          *****  菜单  ******                           /n");
printf(" ***************  1.察看单个排序的趟数和比较，交换次数    ******************/n");
printf(" ***************  2.察看各个排序的趟数和比较，交换次数    ******************/n");
printf("请输入要操作的数1. /2.:  ");
scanf("%d",&ch);
if(ch==1)
{printf("      ****  1.直接插入排序  **** /n");
 printf("      ****  2.二分插入排序  **** /n");
 printf("      ****  3.shell插入排序 **** /n");
 printf("      ****  4.直接选择排序  **** /n");
 printf("      ****  5.冒泡排序      **** /n");
 printf("      ****  6.快速排序      **** /n");
 printf("      ****  7.归并排序      **** /n");
 printf("请输入要操作的字符:1/2/3/4/5/6/7:  ");
 scanf("%d",&ch1);
 while(ch1!=0)
 { checkfloat(tab1,ch1);
    printf("输入0结束,否则输入操作字符:");
 getchar();
  scanf("%d",&ch1);
   }
}
else
  if(ch== 2)  checkdouble(tab1) ;
     else
  printf("输入错误!!!请重新输入!");
}