RosettaCodeData/Task/Evaluate-binomial-coefficients/K/evaluate-binomial-coefficients-3.k
Ingy döt Net db842d013d A-M baby
2013-04-10 21:29:02 -07:00

11 lines
125 B
Text

pascal:{x{+':0,x,0}\1}
pascal 5
(1
1 1
1 2 1
1 3 3 1
1 4 6 4 1
1 5 10 10 5 1)
{[n;k](pascal n)[n;k]} . 5 3
10