Count in octal: Difference between revisions

Content added Content deleted
(→‎{{header|REXX}}: added the REXX language. -- ~~~~)
m (→‎{{header|REXX}}: clarified number of digits to use in REXX. -- ~~~~)
Line 868: Line 868:
└────────────────────────────────────────────────────────────────────┘*/
└────────────────────────────────────────────────────────────────────┘*/


numeric digits 1000


do j=0 to 136*(2**256) /*Sir Eddington, here we come ! */
do j=0 to 136*(2**256) /*Sir Eddington, here we come ! */
Line 878: Line 879:


say 'base ten='j " octal="b2x(o)+0
say 'base ten='j " octal="b2x(o)+0

if j>sourceline() then exit /*stop if #protons > program statements.*/
if j>sourceline() then exit /*stop if #protons > program statements.*/

end
end
</lang>
</lang>