Sorting algorithms/Selection sort: Difference between revisions

{{works with|ALGOL 68G|Any - tested with release mk15-0.8b.fc9.i386}}

{{works with|ELLA ALGOL 68|Any (with appropriate job cards) - tested with release 1.8.8d.fc9.i386}}

MODE DATA = REF CHAR;

FOR i TO UPB ref data DO print(ref data[i]) OD; print(new line);

print((data))

Output:

<pre>

=={{header|Forth}}==

defer less? ' < is less?

array 10 selection

array 10 cells dump

=={{header|Fortran}}==