void HeapSort (elemtype x[], int n)
/*用堆排序法對記錄x[0]--x[n-1]排序*/
{
   int i;
   elemtype Temp;

   /*初始建堆*/
   for(i=(n-2/2);i>=0;i--)
      CreatHeap(x,n,i);

   /*輸出堆頂元素后調整堆*/
   for(i=n-1;i>0;i--)
   {
      Temp=x[0];
      x[0]=x[i];
      x[i]=Temp;
      CreatHeap(x,i,0);
   }
}