Factoriels et combinaisons
Description
Calcul des factoriels avex une fonction et utilisation de cette même fonction pour calculer les combinaisons. Les interets sont multiples deux fonctions sont présentes, on en utilise une dans une autre, utilisation de boucles for, interet mathématique évident.
Source / Exemple :
Function Combinaison(n As String, k As String) As String
'Les deux premieres étapes évitent des calculs évidents
If k = 0 Or n = k Then
Combinaison = 1
Exit Function
End If
If k = 1 Or k = n - 1 Then
Combinaison = n
Exit Function
End If
Combinaison = Factoriel(n) / (Factoriel(k) * Factoriel(n - k))
End Function
Function Factoriel(n As String) As String
Dim f As String
If n <= 1 Then
'Par convention 0!=1
Factoriel = 1
Else
Factoriel = n * Factoriel(n - 1)
End If
End Function
Codes Sources
A voir également
- Factoriels et combinaisons
- Combinaisons keno - Forum Visual Basic
- Générateur de combinaisons - Forum C / C++ / C++.NET
- Éditer toutes les combinaisons du keno - Forum Visual Basic
- Générer toutes le combinaisons possibles d'une chaîne de caractères - Forum C
- Nombre de combinaisons loto - Forum Visual Basic
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.