Hofstadter Q sequence: Difference between revisions
m
BASIC256 and BBC BASIC moved to the BASIC section.
(Add RPL section) |
m (BASIC256 and BBC BASIC moved to the BASIC section.) |
||
Line 731:
number of Q(n)<Q(n+1) for n<=100000 : 49798</pre>
=={{header|
==={{header|BASIC256}}===
{{trans|FreeBASIC}}
<syntaxhighlight lang="basic256">
Line 757 ⟶ 758:
</pre>
==={{header|BBC BASIC}}===
<syntaxhighlight lang="bbcbasic"> PRINT "First 10 terms of Q = " ;
FOR i% = 1 TO 10 : PRINT ;FNq(i%, c%) " "; : NEXT : PRINT
| |||