Структуры и алгоритмы обработки данных


Представление бинарных деревьев - часть 4


                    current^.left:= pnt;

             end;

            if n=2 then

             begin {Создание правого потомка}

                       if current^.right= nil then new(pnt)

                      else pnt:= current^.right;

                      writeln('right ');

                      readln;

                      read(s);

                      pnt^.name:=s;

                      pnt^.left:=nil;

                      pnt^.right:=nil;

                      current^.right:= pnt;

             end;

             if n=3 then

             begin {Поиск узла}

                     writeln('name ');




Начало  Назад  Вперед



Книжный магазин