Anonymous user
Catalan numbers/Pascal's triangle: Difference between revisions
no edit summary
(Added Algol W) |
No edit summary |
||
Line 969:
{{Out}}
<pre>1 2 5 14 42 132 429 1430 4862 16796 58786 208012 742900 2674440 9694845 </pre>
=={{header|OCaml}}==
let catalan : int ref = ref 0 in
Printf.printf "%d ," 1 ;
for i = 2 to 9 do
let nm : int ref = ref 1 in
let den : int ref = ref 1 in
for k = 2 to i do
nm := (!nm)*(i+k);
den := (!den)*k;
catalan := (!nm)/(!den) ;
done;
print_int (!catalan); print_string "," ;
done;;
</lang>
{{out}}
<pre>
OUTPUT:
1 ,2,5,14,42,132,429,1430,4862
</pre>
=={{header|Oforth}}==
| |||