Profesor: Rodrigo Salas
19
Heapsort
void Heapsort(Dato A[], int N){
  int i;
  Tipo_Clave v;
  for(i=N/2;i>=0;i--)
empuja(i,N);
  for(i=N;i>1;i--){
Intercambia(A[1],A[i]);
empuja(1,i-1);
  }
}