Форум на Исходниках.RU https://forum.sources.ru Форум на Исходниках.RU Форум на Исходниках.RU https://forum.sources.ru/index.php?showtopic=399089&view=findpost&p=3571025 Wed, 04 Feb 2015 19:21:04 +0000 ЛИСП Списки https://forum.sources.ru/index.php?showtopic=399089&view=findpost&p=3571025 Lira Lisp https://forum.sources.ru/index.php?showtopic=399089&view=findpost&p=3571005 Wed, 04 Feb 2015 18:33:20 +0000 ЛИСП Списки https://forum.sources.ru/index.php?showtopic=399089&view=findpost&p=3571005
    (raznost '(a b c) '(b d))
Результат должен быть (a c). Одинарная кавычка - функция quote, возвращающая свой аргумент в неизмененном виде.]]> Vesper Lisp https://forum.sources.ru/index.php?showtopic=399089&view=findpost&p=3570987 Wed, 04 Feb 2015 17:19:35 +0000 ЛИСП Списки https://forum.sources.ru/index.php?showtopic=399089&view=findpost&p=3570987 Программы должны быть написаны на языке двух языках: Лисп и Пролог. В программе на Прологе исходные данные должны вводиться с клавиатуры, цель - внутренняя.
В прологе все отлично получилось, а в ЛИСПЕ не могу запустить на выполнение, необходимо сделать скриншот.
Вот текст программы:

[Код]
(defun raznost(a b)
(cond
((null a) nil)
((null b) a)
((member (car a) b) (raznost (cdr a) b))
(t (cons (car a)(raznost (cdr a) b)))
)
)

[/ код]

Подскажите, как ее запустить.]]> Lira Lisp