Diese Funktion berechnet iterativ den Binomialkoeffizienten von n über k. Weitere Informationen zu diesem Thema finden Sie hier:
http://de.wikipedia.org/wiki/Binomialkoeffizient
Function nCk(ByVal n As Short, ByVal k As Byte) As Integer
If (k << 1) > n Then k = n - k
nCk = n
For t As Byte = 1 To k - 1
nCk = nCk * (n - t) \ (t + 1)
Next
End Function
Abgelegt unter
Binomialkoeffizient,
Binom,
Koeffizient,
binomial,
iterativ,
Iteration,
rekursiv,
Rekursion,
n,
k,
mathe.
1 Kommentare zum Snippet