ВУЗ:
Составители:
13
Пример 3.2. Инфиксный обход дерева :
procedure InOrder(T : Tree);
begin
if T <> nil then
begin
InOrder (T^.L);
{ операция обработки узла дерева , например, writeln( T^.inf );}
InOrder (T^.R)
end
end; { InOrder }
Пример 3.3. Постфиксный обход дерева :
procedure PostOrder(T : Tree);
begin
if T <> nil then
begin
PostOrder (T^.L);
PostOrder (T^.R)
{ операция обработки узла дерева , например, writeln( T^.inf );}
end
end; { PostOrder }
Замечание. Ссылка T передается как параметр - значение, т.е. в проце-
дуре используется ее локальная копия.
При реализации нерекурсивных процедур обхода
дерева обычно исполь-
зуют вспомогательный стек и операции работы с ним:
– очистить стек (создать пустой стек);
– проверить, является ли стек пустым;
– добавить в стек элемент;
– извлечь элемент из стека.
Страницы
- « первая
- ‹ предыдущая
- …
- 9
- 10
- 11
- 12
- 13
- …
- следующая ›
- последняя »