Revision as of 08:37, 9 February 2013 (view source) rosettacode>Gerard Schildberger m (→‎{{header\|REXX}}: changed the number of digits, just in case... -- ~~~~) ← Older edit		Revision as of 14:01, 9 February 2013 (view source) rosettacode>Cham m (→‎{{header\|lang5}}: rev.) Newer edit →
Line 506: =={{header\|lang5}}== <lang lang5>'%4o '__number_format set 0 do dup 1 compress . "\n" . 1 + loop</lang> ~~: <last> length 1 - iota remove ;~~ ~~: last' dup iota <last> ;~~ ~~: oct. last' . cr 1 + ;~~ ~~2 do oct. loop ;</lang>~~ =={{header\|Liberty BASIC}}==

Count in octal: Difference between revisions

Count in octal (view source)