Anonymous user
Sorting algorithms/Bubble sort: Difference between revisions
no edit summary
imported>Maxima enthusiast No edit summary |
|||
Line 4,741:
1 2 3 4 5 6 7 8 9</pre>
=={{header|Maxima}}==
<syntaxhighlight lang="maxima">
bubble_sort(u) := block(
[n: length(u), swapped: true, temp],
while swapped do (
swapped: false,
for i: 1 thru n - 1 do (
if u[i] > u[i + 1] then (
temp: u[i],
u[i]: u[i + 1],
u[i + 1]: temp,
swapped: true
)
)
),
u
);
/* Example */
/* sample:[3,65,6,24,24,89,2,59,6]$
bubble_sort(%);
[2,3,6,6,24,24,59,65,89]
*/
</syntaxhighlight>
=={{header|MAXScript}}==
| |||