RosettaCodeData/Task/Hofstadter-Q-sequence/Maple/hofstadter-q-sequence-2.maple
Ingy döt Net db842d013d A-M baby
2013-04-10 21:29:02 -07:00

5 lines
133 B
Text

> seq( Q( i ), i = 1 .. 10 );
1, 1, 2, 3, 3, 4, 5, 5, 6, 6
> Q( 1000 );
502