Двоичные деревья

16.06.2010, 16:21. Показов 1113. Ответов 0

Метки нет (Все метки)

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

Задача:

Описать рекурсивную функцию или процедуру, которая определяет максимальную глубину непустого дерева Т, т.е. число ветвей в самом длинном из путей от корня дерева до листьев.

Добавлено через 49 минут
Решение.. (возможно неправильное)

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
program Tree;
uses crt;
Type Tree=^uzel;
uzel = Record
     left, right: Tree;
     inf:integer;
     End;
 
Var
T:Tree;
x,i:integer;
 
function Ins(pp:Tree; v:integer):Tree;
var
q:tree;
begin
if pp=nil then
   begin
   new(q);
   with q^ do
        begin
        inf:=i;
        left:=nil;
        right:=nil;
        end;
   Ins:=q;
   exit;
   end;
if pp^.inf=v then
   begin
   Ins:=pp;
   exit;
   end;
if pp^.inf>v then
   pp^.left:=Ins(pp^.left,v)
else
   pp^.right:=Ins(pp^.right,v);
Ins:=pp;
end;
 
function MaxDepth(p:Tree):integer;
var
i,max,nn:integer;
begin
if p=nil then
   begin
   MaxDepth:=0;
   exit;
   end;
max:=MaxDepth(p^.left);
nn:=MaxDepth(p^.right);
if nn>max then max:=nn;
MaxDepth:=max+1;
end;
 
BEGIN
clrscr;
Randomize;
T:=nil;
x:=random(50);
for i:=1 to x do
    T:=Ins(T, i);
write(MaxDepth(T));
END.

cpp_developer

Эксперт

20123 / 5690 / 1417

Регистрация: 09.04.2010

Сообщений: 22,546

Блог

16.06.2010, 16:21

Ответы с готовыми решениями:

Двоичные деревья, хеш таблицы
Доброго времени суток! Помогите пожалуйста со следующими задачами. 1). Программа создает двоичное дерево. Пользователь заполняет его....

Деревья принятия решения (Деревья классификации)
Доброго времени суток! Столкнулся с такой проблемой: требуется написать программу на Pascal для курсовой! Нужно создать дерево приянтия...

Формулы двоичные
Составить алгоритм, записанный в виде блок-схемы для вычисления суммы следующего ряда с точностью eps Проверить алгоритм для суммы первых...

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

raxper

Эксперт

30234 / 6612 / 1498

Регистрация: 28.12.2010

Сообщений: 21,154

Блог

16.06.2010, 16:21

Помогаю со студенческими работами здесь

Двоичные и десятичные системы исчисления
Здравствуйте , нужен простой вариант функции bintodec. Заранее спасибо.

Разработать подпрограмму, позволяющую распознавать двоичные числа.
Разработать подпрограмму, позволяющую распознавать двоичные числа. Используя созданную подпрограмму, определить сумму двух двоичных...

двоичные файлы...Определить, входит ли в файл сочетание abcdefgh.
Дан символьный файл f. Определить, входит ли в файл сочетание abcdefgh. не могу сообразить..здесь наверное работа с двоичными...

Двоичные строки заданной длины в обратном порядке
Помогите разобраться с кодом По данному числу N выведите все строки длины N из нулей и единиц в обратном лексикографическом порядке. ...

Преобразовать десятичные числа 121 и 17 в двоичные.
С помощью подпрограммы преобразовать десятичные числа 121 и 17 в двоичные.

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:

Новые блоги и статьи Все статьи Все блоги /
Модульный подход на примере F# DevAlt 06.03.2026 В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .	Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование 8Observer8 05.03.2026 Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .	SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D 8Observer8 04.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .	SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий 8Observer8 02.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip Сканируйте QR-код на мобильном и вы увидите, что появится джойстик для управления главным героем. . . .
Реалии Hrethgir 01.03.2026 Нет, я не закончил до сих пор симулятор. Эта задача сложнее. Не получилось уйти в плавсостав, но оно и к лучшему, возможно. Точнее получалось - но сварщиком в палубную команду, а это значит, в моём. . .	Ритм жизни kumehtar 27.02.2026 Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .	SDL3 для Web (WebAssembly): Сборка библиотек: SDL3, Box2D, FreeType, SDL3_ttf, SDL3_mixer и SDL3_image из исходников с помощью CMake и Emscripten 8Observer8 27.02.2026 Недавно вышла версия 3. 4. 2 библиотеки SDL3. На странице официальной релиза доступны исходники, готовые DLL (для x86, x64, arm64), а также библиотеки для разработки под Android, MinGW и Visual Studio. . . .	SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами 8Observer8 20.02.2026 Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .

Наверх