Sorting algorithms/Gnome sort: Difference between revisions

Content deleted Content added
solved for maxscript
Line 1,091: Line 1,091:


1 2 3 4 5 6</lang>
1 2 3 4 5 6</lang>

=={{header|MAXScript}}==
<lang MAXScript>fn gnomeSort arr =
(
local i = 2
local j = 3
while i <= arr.count do
(
if arr[i-1] <= arr[i] then
(
i = j
j += 1
)
else
(
swap arr[i-1] arr[i]
i -= 1
if i == 1 then
(
i = j
j += 1
)
)
)
return arr
)</lang>
Output:
<lang MAXScript>
a = for i in 1 to 10 collect random 1 20
#(20, 10, 16, 2, 19, 12, 11, 3, 5, 16)
gnomesort a
#(2, 3, 5, 10, 11, 12, 16, 16, 19, 20)
</lang>


=={{header|Metafont}}==
=={{header|Metafont}}==