RosettaCodeData/Task/Sort-an-integer-array/EasyLang/sort-an-integer-array.easy

13 lines
193 B
Plaintext

proc sort . d[] .
for i = 1 to len d[] - 1
for j = i + 1 to len d[]
if d[j] < d[i]
swap d[j] d[i]
.
.
.
.
a[] = [ 2 4 3 1 2 ]
sort a[]
print a[]