Программирование на языке Pascal



       Смотрите здесь немецкие кухни в москве. |   

Реализация


Для простоты реализации вновь пополним структуру дерева полем next:ukaz, которое будет служить для связки очереди:

head:= root; tail:= root; k:= 0; repeat tail^.next:= head^.left; if head^.left<>nil then tail:= tail^.next; tail^.next:= head^.right; if head^.right<>nil then tail:= tail^.next; inc(k); head^.znachenie:= k; {можно write(head^.znachenie);} head:= head^.next until head = nil;

Последовательность нумерации вершин при обходе дерева в ширину

Рис. 12.5.  Последовательность нумерации вершин при обходе дерева в ширину




Содержание  Назад  Вперед