[Liste] Suppression dans une liste triée

Une procédure qui permet de suprimer un élément dans une liste triée

Procédure suppTrier(var a: liste, x: entier);
Var
	b: liste;
Debut
	Si(a == nil) Alors
		Ecrire("Liste vide...");
	Sinon Si(x > a^contenu) Alors
		b := a^suivant;
		Renvoyer suppTrier(b, x);
		a^suivant := b;
	Sinon Si(x == a^contenu) Alors
		b := a;
		a := a^suivant;
		dispose(b);
	FinSi
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 :