В поле записи
Код
ttype=record
n:integer;
count:integer
что может означать count and n, а также i?
Заранее благодарю!
Begin
If T <> nil Then
With T^ Do
Begin
If Data.n < i Then Add(Right, i)
Else
If Data.n > i Then Add(Left, i)
Else Inc(Data.Count) { <-- Вот здесь - элемент уже есть в дереве, просто увеличить счетчик }
End
Else
CreateNode(T, i)
End;