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


Добавил:DMT
Дата создания:30 декабря 2007, 19:21
Дата обновления:30 декабря 2007, 19:21
Просмотров:6760 последний 10 марта, 21:39
Комментариев: 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.       
  5. predicates      
  6. mem_tree(tree)      
  7. clauses        
  8. mem_tree(void).      
  9. mem_tree(tree(Y,L,R)):-mem_tree(L),mem_tree(R).      
  10.       
  11. goal      
  12. mem_tree(tree(a,tree(k,void,void),tree(c,void,void))).
При использовании обязательна ссылка на http://DMTSoft.ru