16 lines
386 B
Nim
16 lines
386 B
Nim
proc gnomeSort(list:var seq[int]) =
|
|
var
|
|
i = 0
|
|
while i < list.high:
|
|
if list[i] > list[i + 1]:
|
|
swap(list[i + 1], list[i])
|
|
if i > 0:
|
|
dec i
|
|
else:
|
|
inc i
|
|
|
|
when isMainModule:
|
|
var
|
|
seq1 = @[1, 3, 2, 56, 2, 1, 32, 45, 23, 41, 6, 47, 212, 32, 6, 98, 54, 457, 37, 4]
|
|
gnomeSort(seq1)
|
|
echo seq1
|