Опишите неименованные функцию, которая: объединяет остальные элементы трех списков в один список. - Lisp

Формулировка задачи:

1) Опишите неименованные функцию, которая: объединяет остальные элементы трех списков в один список. 2)Опишите неименованные функцию, которая позволит объединить главы трех списков в один список (RM F G H J (J G D)) (2 3 4 5 6 (7 8)) (U N Y L O O P) - начальные списки кто может помогите пожалуйста !!! ОГРОМНОЕ СПАСИБО )))

Решение задачи: «Опишите неименованные функцию, которая: объединяет остальные элементы трех списков в один список.»

Листинг программы

(lambda (l1 l2 l3) (cons (car l1) (cons (car l2) (cons (car l3) nil))))
 
;; вызов:
 
((lambda (l1 l2 l3) (cons (car l1) (cons (car l2) (cons (car l3) nil)))) '(a b c) '(d e f) '(g h i))
 
==> (a d g)

Объяснение кода листинга программы

В коде представлена анонимная функция, которая принимает три аргумента типа списков (l1, l2, l3). Она объединяет первые элементы этих списков в один список и возвращает его. В приведенном примере функция вызывается с тремя аргументами: '(a b c), '(d e f), '(g h i). Первые элементы каждого из этих списков: 'a, 'd, 'g, объединяются в один список и возвращаются в качестве результата: (a d g).