[Fonction récursive] La division entière de x par y

Une fonction récursive qui permet de renvoyer la division entière de x par y:


Fonction Div(x, y: entier): entier;
	
Var
	résultat: entier;
	
Debut
	
	Si(x < y) Alors
		résultat := 0;
	Sinon
		résultat := Div(x - y, y) + 1;
	FinSi
	
	Renvoyer résultat;
	
Fin

Laisser des commentaires:

Entrez vos coordonnées ci-dessous ou cliquez sur une icône pour vous connecter:

Logo WordPress.com

Vous commentez à l'aide de votre compte WordPress.com. Déconnexion / Changer )

Image Twitter

Vous commentez à l'aide de votre compte Twitter. Déconnexion / Changer )

Photo Facebook

Vous commentez à l'aide de votre compte Facebook. Déconnexion / Changer )

Photo Google+

Vous commentez à l'aide de votre compte Google+. Déconnexion / Changer )

Connexion à %s

%d blogueurs aiment cette page :