1
.docxМИНИСТЕРСТВО ОБРАЗОВАНИЯ И НАУКИ РОССИЙСКОЙ ФЕДЕРАЦИИ
Федерально автономное образовательное учреждение высшего образования
«Севастопольский государственный университет»
кафедра Информационных систем
Волков Андрей Алексеевич
Институт информационных технологий и управления в технических системах
курс 4 группа ИС/б-41-о
09.03.02 Информационные системы и технологии (уровень бакалавриата)
ОТЧЕТ
по лабораторной работе №1
по дисциплине «Методы и системы искусственного интеллекта»
на тему «Исследование базовых функций языка Лисп»
Отметка о зачете ____________________ ________
(дата)
Руководитель практикума
ассистент Забаштанский А. К.
(должность) (подпись) (инициалы, фамилия)
Севастополь 2017
-
ЦЕЛЬ РАБОТЫ
Изучение технологии подготовки и выполнения Лисп-программ в выбранной интегрированной среде, исследование свойств базовых функций обработки списков, а также способов описания и вызова нерекурсивных функций в языке программирования Лисп.
-
ПОСТАНОВКА ЗАДАЧИ
Вариант №5
Проверить, является ли второй элемент списка отрицательным числом. Если не является, то вернуть исходный список без последнего элемента, иначе — без первого элемента.
-
ХОД РАБОТЫ
Код функции:
(defun otr(x y z)
(cond
((MINUSP x) (list x y))
((MINUSP y) (list y z ))
((MINUSP z) (list x y))
(t (list y z))
)
)
(defun otr1(x y z) (if (> (* y -1) 0) (cons y z ) (cons x y)))
(print (otr -1 2 -3))
(print (otr1 1 -2 3))
Результат работы:
(print (otr -1 2 -3)) - (-1 2)
(print (otr1 1 -2 3)) -(-2 3)
(print (otr 0 0 0)) –(0 0)
(print (otr1 0 0 0)) – (0 0)
(print (otr ф а в)) - *** - EVAL: variable Ф has no value
(print (otr1 + . +)) - *** - EVAL/APPLY: Too few arguments (1 instead of at least 3) given to OTR1
ВЫВОДЫ
В ходе лабораторной работы были изучены технологии подготовки и выполнения Лисп-программ, исследованы свойства базовых функций обработки списков, а также способов описания и вызова нерекурсивных функций в языке программирования Лисп.