Count in octal: Difference between revisions
Content added Content deleted
m (→{{header|J}}: echo and smoutput do the same thing, but echo is easier for more people to understand at a glance (it's also shorter)) |
|||
Line 2,820: | Line 2,820: | ||
=={{header|S-BASIC}}== |
=={{header|S-BASIC}}== |
||
Although many |
Although many BASICs have a built-in OCT$ function, S-BASIC does not, so we have to supply our own |
||
<lang BASIC> |
<lang BASIC> |
||
rem - return p mod q |
rem - return p mod q |
||
Line 2,849: | Line 2,849: | ||
</lang> |
</lang> |
||
{{out}} |
{{out}} |
||
Showing first and last 10 lines of output |
|||
<pre> |
<pre> |
||
1 |
1 |
||
Line 2,858: | Line 2,859: | ||
7 |
7 |
||
10 |
10 |
||
11 |
|||
12 |
|||
... |
... |
||
77766 |
|||
77767 |
|||
77770 |
77770 |
||
77771 |
77771 |