Catalan numbers/Pascal's triangle: Difference between revisions
+Maple
m (Ran code through zig fmt.) |
(+Maple) |
||
Line 1,259:
15: 9694845
</pre>
=={{header|Maple}}==
<lang maple>catalan:=proc(n)
local i,a:=[1],C:=[1];
for i to 10 do
a:=[0,op(a)]+[op(a),0];
a:=[0,op(a)]+[op(a),0];
C:=[op(C),a[i+1]-a[i]];
od;
C
end:
catalan(10);
# [1, 1, 2, 5, 14, 42, 132, 429, 1430, 4862, 16796]</lang>
=={{header|Mathematica}} / {{header|Wolfram Language}}==
| |||