Arbre binaire
Résolu
joura.
Messages postés
258
Statut
Membre
-
joura. Messages postés 258 Statut Membre -
joura. Messages postés 258 Statut Membre -
Bonjour,j'aimerai bien que vous m'aidiez svp voici ma procédure:
procedure suprimer(var r:arbre);
begin
if r<>nil then
begin
dispose(r);
if r^.fg<> nil then
suprimer(r^.fg);
if r^.fd<>nil then
suprimer(r^.fd);
end;
end;
j'utilise le pascale ...je sais pas pour quoi ca marche pas correctement cette procédure elle vide l'arbre mais ils me reste toujours le dernier éléments
merci d'avance
procedure suprimer(var r:arbre);
begin
if r<>nil then
begin
dispose(r);
if r^.fg<> nil then
suprimer(r^.fg);
if r^.fd<>nil then
suprimer(r^.fd);
end;
end;
j'utilise le pascale ...je sais pas pour quoi ca marche pas correctement cette procédure elle vide l'arbre mais ils me reste toujours le dernier éléments
merci d'avance
A voir également:
- Arbre binaire
- Binaire - Guide
- Arbre généalogique famille michelin - Télécharger - Généalogie
- Editeur binaire - Télécharger - Édition & Programmation
- Alphabet binaire - Forum Programmation
- Codage de caractère en binaire ✓ - Forum Programmation
