Функциональное и логическое программирование вар. 34381

Использовать интерпретатор с языка XLisp

Выполнить две контрольные работы состоящие из 3ех заданий

Задание состоит из трех задач, в которых требуется составить программы на Лиспе. В первой задаче не требуется рекурсия, остальные две задачи требуют применения простой рекурсии. При составлении программ (если не оговорено противное) можно использовать все встроенные функции Лиспа.

КР1

Вариант 6

1. Определите функцию (f a b c), которая вычисляет список корней квадрат- ного уравнения ax^2+bx+c=0 (если корней нет, то список пустой).
2. Напишите функцию, аналогичную встроенной функции замены subst в спи- ске s выражения x на y, но производящую взаимную замену x на y, т.е. x->y, y->x.
3. Определите функцию (f s), результатом которой является список, полу- чающийся после удаления на всех уровнях всех положительных элементов списка чисел s.

КР2

Задание состоит из трех задач, в которых требуется составить программы на Лиспе. В первых двух задачах требуется для программирования использовать локальные или вспомогательные функции. В третьей задаче требуется ис- пользовать функционалы. При составлении программ (если не оговорено про- тивное) можно использовать все встроенные функции Лиспа.

Вариант 7

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