> 1 <

Автор Сообщение

trin

Members


Статус

22 сообщений

Где: Ukraine
Род занятий:
Возраст:

#3781   2010-12-26 21:28 GMT+3 часа(ов)      
Используя приемы рекурсии в Лиспе, выполнить преобразование : в качестве иходного - любой многоуровневый список вида
(a b c (d e) f g h (i j k l) m n(o)p) и преобразовать в список в список вида
((a b c) d e ( f g h ) i j k l ( m n) o (p))

помогите пожалуйста

VH

Members


Статус

289 сообщений

Где: ---
Род занятий:
Возраст:

#3782   2010-12-26 23:37 GMT+3 часа(ов)       
(defun F (L)

 (if L

  ((lambda (elem result)

    (if (atom elem)

     (if (atom (car result))

      (cons (cons elem nil) result)

      (cons (cons elem (car result)) (cdr result)))

     (append elem result)))

   (car L)

   (F (cdr L)))))

trin

Members


Статус

22 сообщений

Где: Ukraine
Род занятий:
Возраст:

#3786   2010-12-27 01:09 GMT+3 часа(ов)      
Спасибо большое!!!
> 1 <


Онлайн :

0 пользователь(ей), 36 гость(ей) :