RosettaCodeData/Task/Evaluate-binomial-coefficients/Phix/evaluate-binomial-coefficients-1.phix
2020-02-17 23:21:07 -08:00

7 lines
144 B
Text

global function choose(integer n, k)
atom res = 1
for i=1 to k do
res = (res*(n-i+1))/i
end for
return res
end function