Sort three variables: Difference between revisions
m
→{{header|PicoLisp}}: add out
(→{{header|PicoLisp}}: flagged as having no output shown.) |
m (→{{header|PicoLisp}}: add out) |
||
Line 522:
=={{header|PicoLisp}}==
<lang PicoLisp>(let (X 77444 Y -12 Z 0)
(mapc set '(X Y Z) (sort (list X Y Z)))
(println X Y Z) )</lang>
{{out}}
<pre>77444 -12 0
-12 0 77444</pre>
=={{header|REXX}}==
| |||