6 lines
172 B
Text
6 lines
172 B
Text
beads 1 program 'Sort an integer array'
|
|
calc main_init
|
|
var arr = [4, 1, 2, -1, 3, 0, 2]
|
|
var newarr : array of num
|
|
loop across:arr sort:val count:c val:v
|
|
newarr[c] = v
|