Pascal/Turbo Pascal - Arboles

Que tal, queria saber si alguien tiene código en Pascal de Arboles B* y B+ (altas , bajas y modificaciones) .
Saludos a todos