基数排序和堆排序目前我没有学!
很抱歉,只能告诉你冒泡排序:
思想：比较相邻的两个数，将大数放在前面，小数放在后面，一趟后最小数肯定在后面。
（一）for i:=1 to n-1 do(小的数向下）
          for j:=1  to n-i do
               if  a[j]<a[j+1] then  
begin   temp:=a[j];a[j]:=a[j+1];a[j+1]:=temp end
（二）for  i:=1 to  n-1 do（大的数向上）
        for j:=n downto i+1 do
           if a[j-1]<a[j] then begin temp:=a[j-1];a[j-1]:=a[j];a[j]:=temp end