      domains
      list=integer*
 
      predicates
      insert_sort (list, list)
      insert (integer, list, list)
      asc_order (integer, integer)
 
      clauses
      insert_sort ( [], []).
      insert_sort ([H1|T1], L2):- insert_sort (T1, T2),
                                         insert(H1, T2, L2).
      insert (X, [H1| T1], [H1| T2]) :- asc_order (X, H1), !,
                                      insert (X, T1, T2).
      insert (X, L1, [X| L1]).
      asc_order (X, Y):- X<Y.
 
      goal
      insert_sort ([4, 7, 3, 1488, 9, 67, 11, -25], L).

Как в оконном режиме можно задать дерево?

Заказать работу у эксперта

Programming

Эксперт

94731 / 64177 / 26122

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

Сообщений: 116,782

19.07.2015, 08:12

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

Найти сумму значений узлов бинарного дерева, находящихся на нечетных уровнях
Помогите, пожалуйста с задачкой. :sorry: Найти сумму значений узлов бинарного дерева, находящихся...

Найти количество узлов дерева, значения которых кратны 5
Работаю в SWI-Prolog. Полностью задача звучит так: Создать бинарное дерево и вывести. Найти...

Количество узлов дерева на заданной глубине. Arity Prolog
Условие:?- pred(s(f(b(m,k),a),t(a,w)),1,X). X = 1 ?- pred(s(f(b(m,k),a),t(a,w)),3,X). X = 4 ...

Создание бинарного дерева и ограничение на количество узлов в ней
В задании по созданию бинарного дерева есть условие на то, что узлов в дереве должно быть не ...

	19.07.2015, 08:12

IT_Exp

Эксперт

87844 / 49110 / 22898

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

Сообщений: 92,604

19.07.2015, 08:12

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

Определить количество узлов на каждом уровне данного бинарного дерева
Помогите с этой задачей) Определить количество узлов на каждом уровне данного бинарного дерева....

В дереве бинарного поиска найти для него количество четных значений узлов дерева
В файле input.txt хранится последовательность целых чисел. По входной последовательности построить...

Подсчитать количество элементов на n-м уровне бинарного дерева
Помогите пожалуйста написать рекурсивную функцию или процедуру, которая подсчитывает количество...

Подсчет узлов бинарного дерева
вот код программы: (defun node_counter(tree) (cond ((null tree) 0) ...

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

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

Опции темы

Наверх