RosettaCodeData/Task/Hofstadter-Q-sequence/J/hofstadter-q-sequence-3.j
Ingy döt Net 776bba907c Sync
2013-10-27 22:24:23 +00:00

6 lines
75 B
Text

Q 1+i.10
1 1 2 3 3 4 5 5 6 6
Q 1000
502
+/2>/\ Q 1+i.100000
49798