доброго времени суток.

у кого-нибудь есть исходник "пирамидальной сортировки" на паскле?
а именно - удаление элемента из дерева