#include "iostream"
using namespace std;
#define MAXSIZE 20
typedef struct
{
 int key;
 //其他數(shù)據(jù)信息
}RedType;
typedef struct
{
 RedType r[MAXSIZE+1];
 int length;
}Sqlist;
typedef Sqlist HeapType;  //堆采用順序表存儲表示
void HeapAdjust(HeapType &H,int s,int m)   //已知H.r[s...m]中記錄的關(guān)鍵字出H.r[s].key之外均滿足堆的定義，本函數(shù)調(diào)整H.r[s]的關(guān)鍵字，使H.r[s...m]成為一個大頂堆（對其中記錄的關(guān)鍵字而言）
{
 int j;
 RedType rc;
 rc=H.r[s];
 for(j=2*s;j<=m;j*=2)   //沿key較大的孩子結(jié)點向下篩選
 {
  if(j<m && (H.r[j].key<H.r[j+1].key))     //j為key較大的記錄的下標
   ++j;
  if(rc.key>=H.r[j].key)           //rc應插入在位置s上
   break;
  H.r[s]=H.r[j];      //將左、右孩子較大的結(jié)點與父節(jié)點進行交換，建成大頂堆
  s=j;
 }
 H.r[s]=rc;             //插入
}
void HeapSort(HeapType &H)      //對順序表H進行堆排序
{
 int i;
 for(i=H.length/2;i>0;--i)   //由一個無序序列建成一個大頂堆，將序列看成是一個完全二叉樹，則最后一個非終端節(jié)點是第n/2個元素
  HeapAdjust(H,i,H.length);
 for(i=H.length;i>1;--i)
 {
  H.r[0]=H.r[1];   //將堆頂記錄和當前未經(jīng)排序的子序列H.r[1...i]中最后一個記錄相互交換
  H.r[1]=H.r[i];
  H.r[i]=H.r[0];
  HeapAdjust(H,1,i-1);    //將H.r[1...i-1]重新調(diào)整為大頂堆
 }
}//HeapSort
void InputL(Sqlist &L)
{
 int i;
 printf("Please input the length:");
 scanf("%d",&L.length);
 printf("Please input the data needed to sort:\n");
 for(i=1;i<=L.length;i++)    //從數(shù)組的第1個下標開始存儲，第0個下標作為一個用于交換的臨時變量
  scanf("%d",&L.r[i].key);
}
void OutputL(Sqlist &L)
{
 int i;
 printf("The data after sorting is:\n");
 for(i=1;i<=L.length;i++)
  printf("%d ",L.r[i].key);
 printf("\n");
}
int main(void)
{
 Sqlist H;
 InputL(H);
 HeapSort(H);
 OutputL(H);
 system("pause");
 return 0;
}

/*
*堆排序
*/
#include "iostream"
using namespace std;
#define N 10
int array[N];
void man_input(int *array)
{
 int i;
 for(i=1;i<=N;i++)
 {
  printf("array[%d]=",i);
  scanf("%d",&array[i]);
 }
}
void mySwap(int *a,int *b)//交換
{
 int temp;
 temp=*a;
 *a=*b;
 *b=temp;
}
void heap_adjust(int *heap,int root,int len)     //對堆進行調(diào)整，使下標從root到len的無序序列成為一個大頂堆
{
 int i=2*root;
 int t=heap[root];
 while(i<=len)
 {
  if(i<len)
  {
   if(heap[i]<heap[i+1])
    i++;
  }
  if(t>=heap[i])
   break;
  heap[i/2]=heap[i];
  i=2*i;
 }
 heap[i/2]=t;
}
void heapSort(int *heap,int len)      //堆排序
{
 int i;
 for(i=len/2;i>0;i--)    //由一個無序序列建成一個大頂堆，將序列看成是一個完全二叉樹，則最后一個非終端節(jié)點是第len/2個元素
 {
  heap_adjust(heap,i,len);
 }
 for(i=len;i>=1;i--)
 {
  mySwap(heap+i,heap+1);    //將堆頂記錄與最后一個記錄相互交換
  heap_adjust(heap,1,i-1);   //將下標為1~i-1的記錄重新調(diào)整為大頂堆
 }
}
void print_array(int *array,int n)
{
 int k;
 for(k=1;k<n+1;k++)
 {
  printf("%d\t",array[k]);
 }
}
int main(void)
{
 man_input(array);
 heapSort(array,N);
 printf("\nAfter sorted by the heap_sort algorithm:\n");       
 print_array(array,N);   //打印堆排序結(jié)果
 system("pause");
 return 0;
}