Ajouter des noeuds à un arbre

Bonjour

Un arbre est défini par :

Code:

---

1 2 3 4 5

type arbre = ˆnoeud ; liste_arbre = ˆelement ; noeud = record n :integer ; l :liste_arbre ; end ; element = record a :arbre ; r :liste_arbre ; end ;

---

Je veux savoir, SVP, comment on fait pour ajouter des noeuds à un arbre comme celui-là ?

Et si c'est possible, un livre en info théorique et qui utilise Pascal.

Merci

Vous remarquez que ce n'est pas un arbre binaire

regarde ce lien http://recursivite.developpez.com/?page=page_8 ça pourrait t'aider