Продублировать каждый 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)
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
