Anonymous user
Range consolidation: Difference between revisions
m
→{{header|REXX}}: re-instated a missing line of code.
m (→{{header|REXX}}: re-instated a missing line of code.) |
|||
Line 1,223:
do j=1 to n-1; _= @.j
do k=j+1 to n; if word(@.k,1)>=word(_,1) then iterate; @.j=@.k; @.k=_; _=@.j
end /*k*/
end /*j*/; return</lang>
{{out|output|text= when using the default inputs:}}
<pre>
|