Главная /
Программирование на языке Pascal /
Постройте дерево бинарного поиска (дерево сортировки) для входной последовательности чисел 7 2 5 1 8 3 6 4 9 13 11 10 12, а затем распечатайте вершины этого дерева в порядке обратного обхода. Какая последовательность чисел получится
Постройте дерево бинарного поиска (дерево сортировки) для входной последовательности чисел 7 2 5 1 8 3 6 4 9 13 11 10 12, а затем распечатайте вершины этого дерева в порядке обратного обхода. Какая последовательность чисел получится
вопросПравильный ответ:
7 2 5 1 8 3 6 4 9 13 11 10 12
7 2 1 5 3 4 6 8 9 13 11 10 12
10 12 7 2 5 1 8 4 9 13 11 3 6
7 2 8 1 5 9 3 6 13 4 11 10 12
1 2 3 4 5 6 7 8 9 10 11 12 13
1 4 3 6 5 2 10 12 11 13 9 8 7
13 12 11 10 9 8 7 6 5 4 3 2 1
Сложность вопроса
67
Сложность курса: Программирование на языке Pascal
75
Оценить вопрос
Комментарии:
Аноним
Зачёт защитил. Мчусь в клуб отмечать экзамен intuit
21 мар 2020
Другие ответы на вопросы из темы программирование интуит.
- # Двусвязный линейный список задан указателем на голову head и указателем на хвост tail. Какой оператор необходимо вставить вместо [???], чтобы приведенный ниже отрывок программы правильно удалял из этого списка все элементы со значением 0?{type ssylka = ^spisok; spisok = record znach: integer; next,prev: ssylka end; var head,p,q: ssylka; } while (head<>nil)and(head^.znach =0)do begin p:= head; head:= head^.next; dispose(p); end; if head<>nil then begin head^.prev:= nil; p:= head; while p^.next <> nil do if p^.next^.znach = 0 then begin q:= p^.next; p^.next:= q^.next; if p <> tail then [???]; dispose(q); end else p:= p^.next; end else tail:= nil;
- # Какие вершины орграфа, заданного этим списком смежности, принадлежат ко второму уровню относительно вершины a?a: d f g b: d d: c f g: h h: f
- # Какую высоту будет иметь дерево синтаксического анализа для выражения(a-b)*(c+(x-y)/d)+(k*m-(n/s+t))
- # В какой последовательности распечатает вершины графа, заданного этим списком смежности, процедура прямого обхода? (Обход начинается с вершины a, производится в алфавитном порядке.)a: b d b: d f f: c d g d: h g h: g
- # Имеется набор натуральных чисел, быть может, с повторениями. Необходимо разделить его на два поднабора так, чтобы разность сумм весов была минимальной. Эта задача решается рекурсивным методом полного перебора с отсечением (см. ниже). На вход были поданы числа 45 48 32 12 12 15 46 2 2 3 15. При какой глубине стека контекстов произойдет завершение работы программы (обращение к завершающей процедуре out())? {массив а хранит веса всех предметов, в порядке их ввода, half - "большая" половина суммы всех весов, dif - отклонение текущей найденной суммы от half} procedure rec(k: byte; sum: longint; var dif: longint); var i: byte; begin if sum+a[k]<=half then for i:= k+1 to n do rec(i,sum+a[k],dif) else if half-sum<dif then begin dif:= half-sum; if dif<2 then out(dif){печать и завершение} end end;