Sort disjoint sublist: Difference between revisions
add FreeBASIC
(add FreeBASIC) |
|||
Line 1,090:
Output
<pre> 7 0 5 4 3 2 1 6</pre>
=={{header|FreeBASIC}}==
<lang freebasic>dim as integer value(0 to 7) = {7, 6, 5, 4, 3, 2, 1, 0}
dim as integer index(0 to 2) = {6, 1, 7}, i
for i = 0 to 1
if value(index(i))>value(index(i+1)) then
swap value(index(i)), value(index(i+1))
end if
next i
for i = 0 to 7
print value(i);
next i : print</lang>
{{out}}<pre> 7 0 5 4 3 2 1 6</lang>
=={{header|Go}}==
| |||