Sort a list of object identifiers: Difference between revisions
→Using QuickSort
m (Use foreach instead of failure driven loop) |
|||
Line 1,138:
i=0 : While not Empty {arr$(i)=piece$(letter$+".", ".") : i++ }
}
Print "Unsorted"
For i=0 to len(arr())-1 {
Print join$(arr(i))
Line 1,153:
}
Call Quick.quicksort(&arr(), 0, Len(arr())-1)
Print "Sorted"
For i=0 to len(arr())-1 {
Print join$(arr(i))
}
</lang>
| |||