Sie finden hier ein fast vollständiges Programm, das u.a. die Höhen- und Gewichtsausgeglichenheit eines Binärbaums überprüfen kann. Leider sind die Funktionen PROCEDURE IsHBalanced(p: TREE): BOOLEAN; (überprüft Höhenausgeglichenheit) und PROCEDURE IsGBalanced(p: TREE): BOOLEAN; noch nicht zu Ende implementiert worden. Genau das sollen Sie übernehmen!
 

Aufgabe 1    (5 Punkte)

Schreiben Sie den Programmtext der Prozedur IsHBalanced im Modul Tree.om, das für einen übergebenen (Teil-) Baum überprüft, ob der Baum höhenausgeglichen ist. (RETURN TRUE, falls ja, ansonsten RETURN FALSE!)
 

Aufgabe 2    (5 Punkte)

Schreiben Sie den Programmtext der Prozedur IsGBalanced im Modul Tree.om, das für einen übergebenen (Teil-) Baum überprüft, ob der Baum gewichtsausgeglichen ist. (RETURN TRUE, falls ja, ansonsten RETURN FALSE!)