A. Функция Позиция(x список) возвращает положение атома x в
одноуровневом списке (первый элемент имеет номер 1). Если элемента
в списке нет, то функция возвращает 0.
(Используется функция MEMBER)
b. Функция Сумма-дерева (дерево) возвращает сумму чисел в дереве. Нечисловые символы игнорируются
(Сумма-дерева ’((3 Три) (3 Богатыря) (1 Волк))) = 7
(Используется предикат MEMBERP и CAR-CDR)
(Используется функция MEMBER)
b. Функция Сумма-дерева (дерево) возвращает сумму чисел в дереве. Нечисловые символы игнорируются
(Сумма-дерева ’((3 Три) (3 Богатыря) (1 Волк))) = 7
(Используется предикат MEMBERP и CAR-CDR)