Lisp.Ru - Форумы - Рекурсия

> 1 <

Автор	Сообщение
FOcto Members 1 сообщений Где: Russia Род занятий: Возраст:	#7423 2014-10-07 11:56 GMT+3 часа(ов)
	Помогите написать функцию, которая по списку ‘(q w e r t y) строит сложный список (q (w (e (r (t (y)))))).

_sg Members 42 сообщений Где: Russia Род занятий: Возраст:	#7454 2014-11-01 15:29 GMT+3 часа(ов)
	(defun reconquista (w) (if (null (cdr w)) (list (car w)) (list (car w) (reconquista (cdr w))))) > (reconquista '(a b c d e f)) (A (B (C (D (E (F)))))) (defun reconquista (w) (if (cdr w) `(,(car w) ,(reconquista (cdr w))) `(,(car w)))) > (reconquista '(a b c d e f)) (A (B (C (D (E (F))))))
	Решение задач на языке программирования Лисп

> 1 <

FOcto