Версия для печати темы

Автор: AlexPS 6.07.2005 19:34

Привет всем. Вот такой у меня сегодня вопрос, а вернее задача:

Найти вершины бинарного дерева, для которых высота левого поддерева не равна высоте правого поддерева

Я даже не знаю с чего начать делать её Может вы чего посоветуете.

P.$.
И еще тут такая мне мысле пришла, ведь представлять дерево в виде матрицы, например матрицы смежности графа, - это неэффективно (кол-во 0 будет гораздо больше кол-ва 1), в смысле перебор сильно усложнит. Как бы так представить дерево, чтобы это было максимально эффективно.

Заранее пасиба.

Автор: volvo 6.07.2005 19:42

Ну, для начала, можешь вот тут посмотреть: http://forum.pascal.net.ru/index.php?showtopic=4984&view=findpost&p=40330

Автор: AlexPS 7.07.2005 0:50

Пасиба, ща посмотрю

Автор: AlexPS 14.07.2005 16:41

А в дельфи 7 у меня это не компилируется.... А Паскаля нету...
А нет ничего по этой теме для Дельфи?

Автор: volvo 14.07.2005 19:11

А что именно "не компилируется"? Там же только сами функции - без описания типа TNode, и т.д.

Ну, и кроме того, в Дельфи результат должен возвращаться через переменную Result, то есть не так:

function TNode.Height: integer;
var leftHeight, rightHeight: integer;
begin
  ...
  Height := 1 + MAX(leftHeight, rightHeight)
end;

а вот так:

function TNode.Height: integer;
var leftHeight, rightHeight: integer;
begin
  ...
  Result := 1 + MAX(leftHeight, rightHeight)
end;

P.S. Перенести в Дельфи ?

Автор: AlexPS 14.07.2005 22:06

volvo помоги мне пожалуйста... Че-то я ниче не понимаю

Автор: klem4 14.07.2005 22:42

[offtop]

а почему не скачаешь Паскаль ?

[\offtop]

Автор: AlexPS 14.07.2005 23:05

Не знаю... А сколько это Мб?

Автор: klem4 14.07.2005 23:48

http://pascal.dax.ru/?download :yes:

Автор: AlexPS 15.07.2005 0:26

А какой из них посоветуете???
Только желательно чтобы с виндовым интерфейсом

Автор: klem4 15.07.2005 0:36

с интерфейсом без особо заметных глюков TMT Pascal lite, но так как он lite то писать в нем можно только под DOS. Еще Dev Pascal, но он глючноват.