Mutual recursion: Difference between revisions
Content added Content deleted
m (→with memoization, specific entry: changed wording in the REXX output section header.) |
mNo edit summary |
||
Line 2,141: | Line 2,141: | ||
M(250000)= 154509 |
M(250000)= 154509 |
||
</pre> |
</pre> |
||
=={{header|Ring}}== |
|||
<lang ring> |
|||
see "F sequence:" |
|||
for i = 0 to 20 |
|||
see "" + f(i) + " "; |
|||
next |
|||
see nl |
|||
see "M sequence:" |
|||
for i = 0 to 20 |
|||
see "" + m(i) + " " |
|||
next |
|||
func f n |
|||
fr = 1 |
|||
if n != 0 fr = n - m(f(n - 1)) ok |
|||
return fr |
|||
func m n |
|||
mr = 0 |
|||
if n != 0 mr = n - f(m(n - 1)) ok |
|||
return mr |
|||
</lang> |
|||
=={{header|Ruby}}== |
=={{header|Ruby}}== |