Count in octal: Difference between revisions
Content added Content deleted
(→{{header|Forth}}: rewrite.) |
|||
Line 182: | Line 182: | ||
=={{header|Forth}}== |
=={{header|Forth}}== |
||
Using INTS from [[Integer sequence#Forth]] |
|||
<lang forth>: octal |
|||
<lang forth>: octal ( -- ) 8 base ! ; \ where unavailable |
|||
0 |
|||
octal ints</lang> |
|||
begin |
|||
dup cr . |
|||
1+ |
|||
dup 0= |
|||
until |
|||
drop |
|||
base ! ;</lang> |
|||
=={{header|Fortran}}== |
=={{header|Fortran}}== |