Вывод бинарного дерева (перевести на SWI Prolog)
Формулировка задачи:
Напишите, пожалуйста, как код, приведенный ниже, будет выглядеть в диалекте SWI prolog. Это обычный вывод бинарного дерева.
Решение задачи: «Вывод бинарного дерева (перевести на SWI Prolog)»
textual
Листинг программы
print_tree(nil):- !. print_tree(tree(Root, Left, Right)):- write(Root), nl, print_tree(Left), print_tree(Right). :- print_tree(tree(4, tree(2, tree(1, nil, nil), tree(3, nil, nil)), tree(5, nil, nil))).