Форум
» Назад на решение задач по физике и термеху
Регистрация | Профиль | Войти | Забытый пароль | Присутствующие | Справка | Поиск

» Добро пожаловать, Гость: Войти | Регистрация
    Форум
    Информационные технологии
        паскаль  рекурсивное удаление
Отметить все сообщения как прочитанные   [ Помощь ]
» Добро пожаловать на форум "Информационные технологии" «

Переход к теме
<< Назад Вперед >>
Одна страница
Модераторы: paradise, KMA
  

Guest



Новичок

нужно сделать функцию которая рекурсивно удаляет элемент из бинарного дерева кто может помочь ?

есть  UNIT  с некоторыми функциями здесь :

http://www.hait.ac.il/staff/yuliak/Algorithm/treeunit.pas

а также алгоритм :

Algorithm Delete(element e, tree t)
This returns the original tree with e removed
1. If t is empty return t
2. If e > root node element
2.1 Set tnew = Delete(e, right subtree of t)
2.2 Set the right subtree of t to tnew
3. If e < root node element
3.1 Set tnew = Delete(e, left subtree of t)
3.2 Set the left subtree of t to tnew
4. (e equals root node element)
If left subtree of t is empty
4.1 Return right subtree of t
5. If right subtree of t is empty
5.1 Return left subtree of t
6. (both subtrees are non-empty)
Get smallest element, s, in right subtree
7. Change root node element from e to s
8. Set tnew = Delete(s, right subtree of t)
9. Set the right subtree of t to tnew
10. Return t

но как все это селать на паскале ?

Всего сообщений: Нет | Присоединился: Never | Отправлено: 25 июля 2005 21:20 | IP
Guest



Новичок

Такую программу иожете найти здесь: http://www.progs-scripts.info

Всего сообщений: Нет | Присоединился: Never | Отправлено: 26 мая 2007 17:02 | IP
Sedjj


Новичок

Здравствуйте!!!!!
Помогите пожалуйста решить задачку))))

Имеется n населенных пунктов, перенумерованные от 1 до n(n-10). Некоторые пары пунктов присоединены к дорогам. Определить, можно ли попасть по этим дорогам из 1-го пункта в n-й. Информация о дорогах задается в виде последовательности пар чисел i и j (i<j), указывающих, что i-й и j-й пункты соединены дорогой; признак конца этой последовательности – пара нулей.

Ее надо решить при помощи РЕКУРСИИ!!!!!!!
За ранее спасибо)))

Всего сообщений: 7 | Присоединился: ноябрь 2009 | Отправлено: 16 нояб. 2009 20:22 | IP

Эта тема закрыта, новые ответы не принимаются

Переход к теме
<< Назад Вперед >>
Одна страница

Форум работает на скрипте © Ikonboard.com