> 1 <
Автор | Сообщение |
Anneta
3 сообщений |
#3696 2010-12-15 14:05 GMT+3 часа(ов) |
Пожалуйста помогите решить задачи:
1. Определить функцию, подсчитывающую количество подсписков (на всех уровнях) указанного списка. 2. Определить функцию, выполняющую для каждой группы из бинарного дерева вида "РебенокЛевый"<-Родитель->РебенокПравый" следующее: поменять местами значения детей. Заранее большое спасибо) |
|
Anneta
3 сообщений |
#3697 2010-12-15 22:12 GMT+3 часа(ов) |
Решение первой задачи есть:
(defun sublists-count (list) (cond ((null list) 0) ((atom (car list)) (sublists-count (cdr list))) (t (+ (sublists-count (car list)) (sublists-count (cdr list)) 1)))) Помогите пожалуйста со второй... |
|
megamanx
307 сообщений |
#3700 2010-12-16 01:41 GMT+3 часа(ов) |
(defun incbb (L) Там сокурсница (судя по формулировке заданий) ваша спрашивала что-то подобное. У вас институт из-за погоды закрыт (подозреваю, метеоритный дождь), но вы как-нибудь организуйтесь и спросите у препода, в каком виде представлять штуку (ребёнок<-родитель->ребёнок). Представленное решение - опять же, для дерева типа (1 . 2) или ((1 . 2) . (3 . 4)) и т.п. |
|
I wish I'd made you angry earlier
|
|
Anneta
3 сообщений |
#3702 2010-12-16 03:07 GMT+3 часа(ов) |
Большое спасибо)))
я тоже заметила схожую формулировку и по нику догадываюсь кто это могла быть! =)метеоритный дождь закончился ... завтра в институте обязательно спрошу. |
|
> 1 <