Определить функцию, которая вытаскивает из списка числа - Lisp

Узнай цену своей работы

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

Определить функцию, выбирающую из заданного списка все числовые атомы. С использованием подсписков.

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

textual
Листинг программы
(defun numbers (w &optional ac) 
  (cond ((null w) ac)
        ((atom w) (if (numberp w) (cons w ac) ac))
        ((numbers (car w) (numbers (cdr w) ac)))))
 
> (numbers '(a ((1 b)) (((2) c) 3)))
(1 2 3)

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

12   голосов , оценка 3.667 из 5
Похожие ответы