Smallest numbers: Difference between revisions
Content added Content deleted
m (→{{header|REXX}}: changed the title and title comment.) |
m (→{{header|REXX}}: simplified some code.) |
||
Line 20: | Line 20: | ||
c= commas(k) /*maybe add commas to the powe of six. */ |
c= commas(k) /*maybe add commas to the powe of six. */ |
||
$= $ right(c, max(w, length(c) ) ) /*add a K (power) ──► list, allow big#*/ |
$= $ right(c, max(w, length(c) ) ) /*add a K (power) ──► list, allow big#*/ |
||
if n//cols\ |
if n//cols\==0 then iterate /*have we populated a line of output? */ |
||
say center(idx, 5)'│'substr($, 2); $= /*display what we have so far (cols). */ |
say center(idx, 5)'│'substr($, 2); $= /*display what we have so far (cols). */ |
||
idx= idx + cols /*bump the index count for the output*/ |
idx= idx + cols /*bump the index count for the output*/ |