15 lines
206 B
Text
15 lines
206 B
Text
|
' Sort an integer array
|
||
|
|
DECLARE values[5] TYPE NUMBER
|
||
|
|
values[0] = 23
|
||
|
|
values[1] = 32
|
||
|
|
values[2] = 12
|
||
|
|
values[3] = 21
|
||
|
|
values[4] = 01
|
||
|
|
|
||
|
|
SORT values
|
||
|
|
|
||
|
|
FOR i = 0 TO 3
|
||
|
|
PRINT values[i], ", ";
|
||
|
|
NEXT
|
||
|
|
PRINT values[4]
|