RosettaCodeData/Task/Evaluate-binomial-coefficients/Oforth/evaluate-binomial-coefficients.fth

: binomial(n, k)  | i |  1 k loop: i [ n i - 1+ * i / ] ;