Windows Azure Cloud Storage ermöglicht es Ihnen bereits ab 0,10€ pro GB/Monat die Vorteile der Cloud zu nutzen.
Willkommen bei dotnet-snippets.de! Snippet hinzufügen Login Registrieren
Snippets in der Datenbank: 1551 | Anzahl registrierter User: 1841 | Besucher online: 131
Hauptmenü
Home
Top Ten
Zufälliger Snippet
FAQs
.NET Community
dotnet-forum.de
dotnet-kicks.de
Social

RSS Feeds
Rss Alle Snippets
Rss C#
Rss VB.NET
Rss C++
Rss ASP.NET
Partner
Member of Microsoft Community Leader/Insider Program (CLIP)

Binomialkoeffizient


Autor: Klemens Nanni
Sprache: VB.NET
Bewertung:
noch nicht bewertet
Anzahl der Aufrufe: 4390
  
Kick it on dotnet-kicks.de  

Beschreibung:

Diese Funktion berechnet iterativ den Binomialkoeffizienten von n über k. Weitere Informationen zu diesem Thema finden Sie hier:

http://de.wikipedia.org/wiki/Binomialkoeffizient


Abgelegt unter: Binomialkoeffizient, Binom, Koeffizient, binomial, iterativ, Iteration, rekursiv, Rekursion, n, k, mathe.



Visual Basic
1
2
3
4
5
6
7
8
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
Sie haben Fragen zu diesem Snippet oder brauchen Hilfe bei der .NET Entwicklung?
Freundliche und kompetente Entwickler helfen Ihnen gern weiter im Forum für .NET Entwicklung.



Kommentare:
(Zum Schreiben von Kommentaren bitte anmelden.)

Klemens Nanni schrieb am:  21.12.2010 00:21:53

Ist 2k > n so gilt: nCk(n,k) = nCk(n,n-k)
Diese Gesetzmäßigkeit spart so manche Rechenzeit.


Diese Snippets könnten für Sie interessant sein:
[VB.NET] Größter gemeinsamer Teiler
[VB.NET] Fibonacci-Folge iterativ erzeugen
[VB.NET] Größter gemeinsamer Teiler (2)
[C#] rekursiver Verzeichnislauf
[C#] Eigenschaften aller Steuerlemente eines Formulars setzen
[C#] Treeview rekursiv durchsuchen
[VB.NET] Ordergröße rekursiv bestimmen
[C#] Dateien und Ordner rekursiv löschen
[C#] Ordnergröße ermitteln
[C#] Ordner und Dateien rekursiv durchlaufen
[C#] Ordner mit Inhalt kopieren (rekursiv)
[C#] FTP - Ordner Rekursiv erstellen
[C#] Dateien mit bestimmter Extension rekursiv in Array einlesen
[C#] Erzeugen von Zeichenfolgen durch Permutation
[C#] Verhindern das Funktion rekursiv aufgerufen wird.
[C#] C# Ordner auslesen und in Liste speichern "rekursiv"
[C#] Rekursion Treeview
[C#] Summe 1..n berechnen
[C#] Fibonacci-Folge berechnen
[C#] n-te Fibonaccizahl rekursiv berechnen
[C#] Summe 1²...n² berechnen.
[C#] Summe 1³..n³ berechnen.
[C#] größten gemeinsamen Teiler berechnen.
[VB.NET] Multiplikation von übergroßen Zahlen
[C#] Dreiecksberechnung
[VB.NET] PI nach der Bailey-Borwein-Plouffe-Formel berechnen
[VB.NET] Quadratische Gleichung mit der PQ Formel lösen
[VB.NET] Basisrechenfunktionen für einen Kreis
[C++] Exponents
[C#] Quersummenberechnung
[C#] Geodaten in sexagesimal Format umrechnen
[VB.NET] Größten gemeinsamen Teiler berechnen
[VB.NET] Quadratwurzel ohne Sqrt() Funktion ziehen
[C#] Addiere alle ganzen Zahlen von x bis y
[C++] Caesar
[C#] "echte" Teiler Summe berechnen
[C#] Formelevaluierung aus RPN Form
[C#] Prüfung auf narzisstische Zahlen
[C#] CellMatrix
[C#] Maschinengenauigkeit
[C#] Flächenberechnungen am Kreis,Quadrat,Parallelogramm,Trapez
[C#] Bruch-Klasse
[VB.NET] einfacher rekursiver Mathe Parser
[VB.NET] Permutation nachweisen
[VB.NET] Das Sieb des Eratosthenes
[VB.NET] Primfaktorzerlegung
[VB.NET] Modulare Exponentation
[VB.NET] Das Sieb von Atkin
[VB.NET] Das Sieb von Atkin (2)
[VB.NET] Werte zweier Variablen tauschen
[VB.NET] Ganzzahlige Wurzel
[VB.NET] Binäre Exponentation
[VB.NET] Kleinster natürlicher Teiler > 1
[VB.NET] Das Sieb von Atkin (2) - aktuell
[VB.NET] Dezimalzahl in Zahl der Basis b < 37 konvertieren

schlecht sehr gut
1 2 3 4 5 6 7 8 9 10
Nur angemeldete User können Snippets bewerten.