Catalan numbers: Difference between revisions
Content added Content deleted
(added Liberty BASIC) |
|||
Line 2,416: | Line 2,416: | ||
[14, 2674440, 2674440, 2674440] |
[14, 2674440, 2674440, 2674440] |
||
[15, 9694845, 9694845, 9694845]</pre> |
[15, 9694845, 9694845, 9694845]</pre> |
||
=={{header|Run BASIC}}== |
|||
<lang Runbasic>FOR i = 1 TO 15 |
|||
PRINT i;" ";catalan(i) |
|||
NEXT |
|||
FUNCTION catalan(n) |
|||
IF n = 0 THEN |
|||
catalan = 1 |
|||
ELSE |
|||
catalan = ((2 * ((2 * n) - 1)) / (n + 1)) * catalan(n - 1) |
|||
END IF |
|||
END FUNCTION</lang> |
|||
=={{header|Scala}}== |
=={{header|Scala}}== |