Продублировать каждый 3 элемент списка ,если тот равен некому Х - Lisp
Формулировка задачи:
Здравствуйте. Помогите с решением такой задачки .
Спасибо .
Решение задачи: «Продублировать каждый 3 элемент списка ,если тот равен некому Х»
textual
Листинг программы
(defun task (lst x) (iter (for a in lst) (for i upfrom 1) (when (and (zerop (mod i 3)) (eq a x)) (collecting a)) (collecting a))) ==> task (task '(q w e r t y u) 'e) ==> (q w e e r T y u)
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д