RosettaCodeData/Task/Dutch-national-flag-problem/Logo/dutch-national-flag-problem-2.logo
Ingy döt Net db842d013d A-M baby
2013-04-10 21:29:02 -07:00

7 lines
162 B
Text

do.while [
make "list random_balls 10
] [dutch? :list]
print (sentence [Start list:] arraytolist :list)
print (sentence [Sorted:] arraytolist dutch :list)
bye