Вопрос 6. Написать программу для обхода бинарного дерева по схеме L - X - R .


Добавил:DMT
Дата создания:30 декабря 2007, 19:21
Дата обновления:30 декабря 2007, 19:21
Просмотров:6745 последний позавчера, 0:31
Комментариев: 1
Вопрос 6. Написать программу для обхода бинарного дерева по схеме L - X - R .
up

Комментарии для "Вопрос 6. Написать программу для обхода бинарного дерева по схеме L - X - R ."


Пользователь: DMT
Сообщений: 123
Статус: Программист
Зарегистрирован:
18 октября 2007, 2:35
Был:13 ноября 2017, 4:54
DMT
smsup
Дата: 4 января 2008, 14:49 Сообщение № 1
обход L-X-R
Код на Lisp
  1. domains
  2. s=symbol
  3. tree=tree(s,tree,tree);void
  4. predicates
  5. mem_tree(tree)
  6. clauses
  7. mem_tree(void).
  8. mem_tree(tree(Y,L,R)):-mem_tree(L),mem_tree(R).
  9. goal
  10. mem_tree(tree(a,tree(k,void,void),tree(c,void,void))).
При использовании обязательна ссылка на http://DMTSoft.ru