Sorting algorithms/Heapsort: Difference between revisions
Content added Content deleted
Line 3,796: | Line 3,796: | ||
print_line(Arr0, !IO), |
print_line(Arr0, !IO), |
||
heapsort(<, Arr0, Arr1), |
heapsort(<, Arr0, Arr1), |
||
print_line(Arr1, !IO) |
print_line(Arr1, !IO), |
||
heapsort(>=, Arr1, Arr2), |
|||
print_line(Arr2, !IO). |
|||
%%%------------------------------------------------------------------- |
%%%------------------------------------------------------------------- |
||
Line 3,807: | Line 3,809: | ||
<pre>$ mmc heapsort_task.m && ./heapsort_task |
<pre>$ mmc heapsort_task.m && ./heapsort_task |
||
array([3, 9, 3, 8, 5, 7, 0, 7, 3, 9, 5, 0, 1, 2, 0, 5, 8, 0, 8, 3, 8, 2, 6, 6, 8, 5, 7, 6, 5, 7]) |
array([3, 9, 3, 8, 5, 7, 0, 7, 3, 9, 5, 0, 1, 2, 0, 5, 8, 0, 8, 3, 8, 2, 6, 6, 8, 5, 7, 6, 5, 7]) |
||
array([0, 0, 0, 0, 1, 2, 2, 3, 3, 3, 3, 5, 5, 5, 5, 5, 6, 6, 6, 7, 7, 7, 7, 8, 8, 8, 8, 8, 9, 9]) |
array([0, 0, 0, 0, 1, 2, 2, 3, 3, 3, 3, 5, 5, 5, 5, 5, 6, 6, 6, 7, 7, 7, 7, 8, 8, 8, 8, 8, 9, 9]) |
||
array([9, 9, 8, 8, 8, 8, 8, 7, 7, 7, 7, 6, 6, 6, 5, 5, 5, 5, 5, 3, 3, 3, 3, 2, 2, 1, 0, 0, 0, 0])</pre> |
|||
=={{header|NetRexx}}== |
=={{header|NetRexx}}== |