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

       

Реализация


procedure preorder(p:ukaz; k:integer); begin p^.mark:= k; if p^.left<>nil then preorder(p^.left,k+1); if p^.right<>nil then preorder(p^.right,k+1); end;

begin ... preorder(root,1); {Вызов из тела программы} ... end.


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

on_load_lecture()

Дальше »

  Если Вы заметили ошибку - сообщите нам.  
Страницы:



« |

1

|

2

|

3

|

4

|

5

|

6

|

вопросы | »

|

учебники

|

для печати и PDA

Курсы | Учебные программы | Учебники | Новости | Форум | Помощь



Телефон: +7 (495) 253-9312, 253-9313, факс: +7 (495) 253-9310, email: info@intuit.ru

© 2003-2007, INTUIT.ru::Интернет-Университет Информационных Технологий - дистанционное образование



Содержание раздела