IPB
ЛогинПароль:

> Прочтите прежде чем задавать вопрос!

1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!

> Деревья
overkast
сообщение 26.05.2011 2:44
Сообщение #1





Группа: Пользователи
Сообщений: 1
Пол: Мужской

Репутация: -  0  +


Доброго времени суток )
Возникли проблемы с ссылочными типами данных. Задача: добавить к дереву поиска элемент, если его не было.
Как я понимаю задачу: необходимо создать дерево поиска, пробежаться по нем, выяснить есть ли такой-то элемент в нем, если нету - вставить, распечатать дерево.
Что я имею? Я могу создать и распечатать дерево. Я нашел функцию поиска, но т.к. имею проблемы со знанием синтаксиса не могу пристроить её smile.gif У вас же хотел бы узнать процедуру добавления элемента в дерево, с небольшими комментариями. Сам искал-искал, но так и не разобрался.
Очень надеюсь на вашу помощь в доведении программы до ума. Вот все необходимые модули (в том числе функция поиска) и основная программа, которая только создает и распечатывает дерево поиска.

прошу прощения, если неправильно оформил тему. время позднее, уже не в силах осилить что-либо )



ПРОГРАММА,МОДУЛИ

Сообщение отредактировано: overkast - 26.05.2011 2:45


Прикрепленные файлы
Прикрепленный файл  ________________.txt ( 1.85 килобайт ) Кол-во скачиваний: 169
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

Сообщений в этой теме


 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 



- Текстовая версия 20.07.2025 1:57
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"