Hauteur d'un arbre en turbo pascal

Bonjour a tous je souhaiterai vous soumettre mon problème voila c’est l’écriture d’un sous programme qui calcul la hauteur d’un arbre en turbo pascal,je sais le faire en gdr=sous arbre gauche ensuite sous arbre droit puis la racine et tout ça récursivement mais j’aimerai bien avoir les sous programme en grd et rgd si quelqu’un pouvais m’aider je lui en serais vraiment reconnaissant merci