RosettaCodeData/Task/Formatted-numeric-output/PicoLisp/formatted-numeric-output.l

3 lines
71 B
Common Lisp

(pad 9 (format 7125 3))
(pad 9 (format 7125 3 ",")) # European format