Найти вершины, у которых высоты поддеревьев не равны, а число потомков в правом и левом поддеревьях - равны

@Sarif · Регистрация: 29.12.2015

Студворк — интернет-сервис помощи студентам

Здравствуйте, помогите пожалуйста реализовать программу в полноэкранном режиме.
Найдите вершины, у которых высоты поддеревьев не равны, а количество потомков в правом и левом поддеревьях равны.

@Morgen270 · 08.02.2016, 19:02

Добрый день, уважаемые форумчане, обращаюсь к вам за помощью:
Нужно создать символьное двоичное дерево и:
1)Проверить, есть ли в нем хотя бы два одинаковых символа
2)Найти вершины, у которых высоты поддеревьев неравны, а кол-во потомков в правом и левом поддеревьях равны
Насчет символьного дерева:
Оно должно реализовываться как то так?

Delphi
1
2
3
4
5
6
7
8
Type
    TKey=char;
    Tree=^TTree;
    TTree=record
     Key:TKey;
     Left:Tree;
     Right:Tree;
    end;

Нужно также сделать вставку элемента, но как сделать это с символьным деревом? С integer понятно: если элемент меньше - то влево, если больше - вправо, но как поступить в этом случае?
И можно, пожалуйста, немного помощи с процедурами 1) и 2)?

Добавлено через 1 час 27 минут
Обновляю инфу: с 1) условием и символьным деревом разобрался, но все еще нужна помощь со 2

@Mawrat · 09.02.2016, 15:36

Решение похожей задачи в виде консольного приложения: Поиск элементов в внутри дерева
Для переделки под новое условие, надо строки:

Delphi
105
106
107
108
109
110
    //Если условие выполняется, то учитываем текущий узел в подсчёте и распечатываем сведения о нём.
    if (HL = HR) and (CL <> CR) then
    begin
      Inc(aCnt);
      Writeln(aName, ' (', aPNode^.Data, '): HL = HR = ', HL, ', CL = ', CL, ' <> CR = ', CR);
    end;

поменять на:

Delphi
105
106
107
108
109
110
    //Если условие выполняется, то учитываем текущий узел в подсчёте и распечатываем сведения о нём.
    if (HL <> HR) and (CL = CR) then
    begin
      Inc(aCnt);
      Writeln(aName, ' (', aPNode^.Data, '): HL = ', HL, ' <> HR = ', HR, ', CL = CR = ', CL);
    end;

@Mawrat · 09.02.2016, 16:03

Сообщение от Morgen270

Обновляю инфу: с 1) условием и символьным деревом разобрался, но все еще нужна помощь со 2

Решение похожей задачи, но с целочисленными элементами: Поиск элементов в внутри дерева

Новые блоги и статьи Все статьи Все блоги /
Отчёт о спецтехнике находящейся в ремонте Maks 20.04.2026 Отчёт из решения ниже размещен в конфигурации КА2. Задача: отобразить спецтехнику, которая на данный момент находится в ремонте. Есть нетиповой документ "Заявка на ремонт спецтехники" который. . .	Памятка для бота и "визитка" для читателей "Semantic Universe Layer (Слой семантической вселенной)" Hrethgir 19.04.2026 Сгенерировано для краткого описания по случаю сборки и компиляции скелета серверного приложения. И пусть после этого скажут, что статьи сгенерированные AI - туфта и не интересно. И это не реклама -. . .	Запрет удаления строк ТЧ документа при определенном условии Maks 19.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "Аккумуляторы", разработанного в конфигурации КА2. У данного документа есть ТЧ, в которой в зависимости от прав доступа. . .	Модель заражения группы наркоманов alhaos 17.04.2026 Условия задачи сформулированы тут Суть: - Группа наркоманов из 10 человек. - Только один инфицирован ВИЧ. - Колются одной иглой. - Колются раз в день. - Колются последовательно через. . .
Мысли в слух. Про "навсегда". kumehtar 16.04.2026 Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .	My Business CRM MaGz GoLd 16.04.2026 Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .	Знаешь почему 90% людей редко бывают счастливыми? kumehtar 14.04.2026 Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.	Фиксация колонок в отчете СКД Maks 14.04.2026 Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .

@Sarif 0 / 0 / 0 Регистрация: 29.12.2015 Сообщений: 16

	Найти вершины, у которых высоты поддеревьев не равны, а число потомков в правом и левом поддеревьях - равны 01.02.2016, 21:25. Показов 4072. Ответов 3 Метки деревья (Все метки) Здравствуйте, помогите пожалуйста реализовать программу в полноэкранном режиме. Найдите вершины, у которых высоты поддеревьев не равны, а количество потомков в правом и левом поддеревьях равны. 0

Опции темы