РАЗРАБОТКА ПРОГРАММЫ С ИСПОЛЬЗОВАНИЕМ ЯЗЫКА ЛИСП

1. Определите функцию (summa_digits n), результатом которой является сумма цифр натурального числа n.
2. Определите функцию (f s), которая в одноуровневом списке чисел s
переставляет все отрицательные элементы в начало списка, например,
(f '(4 -8 6 -9 -7)) -> (-8 -9 -7 4 6), меняя знак у каждого атома. Исходный
список не предполагается одноуровневым.
10
3. Определите функцию (f s), которая из списка чисел s создает новый
список, меняя знак у каждого атома. Исходный список не предполагается
одноуровневым.