> 1 <
Автор | Сообщение |
InKaterina
6 сообщений |
#3607 2010-12-07 03:40 GMT+3 часа(ов) |
Извиняюсь за поздний визит, но больше нет сил.за lisp села только седня, что то он мне не дается. задача такая:
Определить рекурсивную функцию, возвращающую количество определенных элементов в списке. Заранее спасибо |
|
megamanx
307 сообщений |
#3608 2010-12-07 11:53 GMT+3 часа(ов) |
для списка и подсписков
(defun foo (A L) без лейблов с опциональной переменной и значением по умолчанию (defun foo2 (A L &OPTIONAL (N 0)) Да, подозреваю, что следующим вопросом будет, как вызывать функцию >> (foo 'a '(a s d f (a (g a f a) a a (a () a) a))) |
|
I wish I'd made you angry earlier
|
|
InKaterina
6 сообщений |
#3612 2010-12-07 16:34 GMT+3 часа(ов) |
Спасибо большое за решение!
Не сочтите за наглость, а сочтите за безнадежность (меня подвели с контрольной), есть еще 2 задачи, все уже перепробывала, чтобы разобраться с lisp, ну никак не получается ![]() 1) Определить функцию, прибавляющую заданное число к каждому элементу (на всех уровнях) указанного списка. 2) пределить функцию, выполняющую для каждой группы из бинарного дерева вида "РебенокЛевый<-Родитель<-РебенокПравый" следующее: увеличить на единицу значение только большего ребенка. Огромное спасибо! |
|
megamanx
307 сообщений |
#3613 2010-12-07 16:53 GMT+3 часа(ов) |
(defun addnum (N L) пока на вторую время нет |
|
I wish I'd made you angry earlier
|
|
InKaterina
6 сообщений |
#3614 2010-12-07 17:05 GMT+3 часа(ов) |
Благодарю за помощь!
|
|
megamanx
307 сообщений |
#3616 2010-12-07 17:26 GMT+3 часа(ов) |
Я не очень умный, конечно, но каким образом должно быть представлено это дерево?
Если нужен список, через точечные пары бинарное дерево, подходящее по структуре для сравнения можно задать, например, так: ((1 . 2) . (3 . 4)) - это дерево с 4-мя листьями, симметричное ((1 . 2) . ((3 . 4) . (5 . 6))) - это с шестью, правая ветвь состоит из двух ветвей (и так далее по аналогии) тогда для такого дерева (defun incbb (L) скобочки не совпали, но дерево по структуре осталось тем же. |
|
I wish I'd made you angry earlier
|
|
InKaterina
6 сообщений |
#3617 2010-12-07 17:51 GMT+3 часа(ов) |
но каким образом должно быть представлено это дерево?
эх, если бы нам еще объяснили, я заочно учусь, дали задание и все. а возможности спросить сейчас нет, институт закрыт (из-за погоды). Но я думаю ты прав, и большое тебе спасибо. P.S. а со скобочками у меня все нормально |
|
> 1 <