Sort numbers lexicographically: Difference between revisions
Content added Content deleted
m (elided a blank line.) |
(Added BaCon version.) |
||
| Line 176: | Line 176: | ||
<pre> |
<pre> |
||
1 10 11 12 13 2 3 4 5 6 7 8 9 </pre> |
1 10 11 12 13 2 3 4 5 6 7 8 9 </pre> |
||
=={{header|BaCon}}== |
|||
<lang bacon>CONST n = 13 |
|||
FOR x = 1 TO n |
|||
result$ = APPEND$(result$, 0, STR$(x)) |
|||
NEXT |
|||
PRINT SORT$(result$) |
|||
</lang> |
|||
{{out}} |
|||
<pre>1 10 11 12 13 2 3 4 5 6 7 8 9</pre> |
|||
=={{header|BBC BASIC}}== |
=={{header|BBC BASIC}}== |
||