Recursif

lexsty Messages postés 169 Date d'inscription samedi 10 décembre 2005 Statut Membre Dernière intervention 18 juin 2017 - 22 janv. 2006 à 09:00
lexsty Messages postés 169 Date d'inscription samedi 10 décembre 2005 Statut Membre Dernière intervention 18 juin 2017 - 22 janv. 2006 à 10:35
Bonjour.

Comment programmer factorielle(n)
en récursif
avec Visual Basic 6 ( si Vb6 permet la récursivité ).

Merci.

3 réponses

econs Messages postés 4030 Date d'inscription mardi 13 mai 2003 Statut Membre Dernière intervention 23 décembre 2008 25
22 janv. 2006 à 09:42
Salut,





Public Function fact(n As Integer) As Integer

If n = 0 Then

fact = 1

Else

fact = n * fact(n-1)

End If

End Function


Manu
-------------------------------------------
Une question bien posée, c'est une chance de réponse bien adaptée.
econs Messages postés 4030 Date d'inscription mardi 13 mai 2003 Statut Membre Dernière intervention 23 décembre 2008 25
22 janv. 2006 à 09:43
La récursivité consiste juste à s'appeler soi-même. C'est plutôt facile. Peu de langage ne l'autorisent pas.

Manu
-------------------------------------------
Une question bien posée, c'est une chance de réponse bien adaptée.
lexsty Messages postés 169 Date d'inscription samedi 10 décembre 2005 Statut Membre Dernière intervention 18 juin 2017
22 janv. 2006 à 10:35
Salut Manu

et merci pour ton code qui marche parfaitement .


JP.
Rejoignez-nous