Count in octal: Difference between revisions
Content added Content deleted
(Added Delphi example) |
(Forth) |
||
| Line 180: | Line 180: | ||
6337 |
6337 |
||
</pre> |
</pre> |
||
=={{header|Forth}}== |
|||
<lang forth>: octal |
|||
base @ 8 base ! |
|||
0 |
|||
begin |
|||
dup cr . |
|||
1+ |
|||
dup 0= |
|||
until |
|||
drop |
|||
base ! ;</lang> |
|||
=={{header|Fortran}}== |
=={{header|Fortran}}== |
||