7 lines
172 B
Text
7 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
|