Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:

Otchet_laba6 ИИС

.docx
Скачиваний:
21
Добавлен:
06.03.2016
Размер:
1.07 Mб
Скачать

Федеральное агентство по образованию

Государственное образовательное учреждение

высшего профессионально образования

Уфимский государственный авиационный технический университет

Кафедра автоматизированных систем управления

Отчет по лабораторной работе №6

по теме: «Запуск и начало работы»

по дисциплине «Интеллектуальные информационные системы»

Выполнили: Абдулова Р.Р.

Мансурова Д.Д.

Группа: ПИ-404

Проверила: Ишмухаметова Л.К.

Уфа 2015

Цель работы

Изучить среду визуальной разработки Visual Prolog. Создать проект и запустить его на выполнение.

Ход работы

Задание 1.

  1. Условие задачи.

Запустить листинг в среде Visual Prolog на выполнение. Запустить листинг в среде Visual Prolog в режиме отладки.

  1. Листинг программы

predicates

likes(symbol,symbol) clauses

likes(ellen,tennis).

likes(john,football).

likes(tom,baseball). likes(eric,swimming). likes(mark,tennis) .

likes(bill,Activity):-likes (tom, Activity) .

goal

likes(bill, baseball).

  1. Результат работы программы

Задание 2.

  1. Условие задачи.

Перепишите программу так, чтобы она выводила значение «no».

  1. Листинг программы

predicates

likes(symbol,symbol)

clauses

likes(ellen,tennis).

likes(john,football).

likes(tom,baseball).

likes(eric,swimming).

likes(mark,tennis) .

likes(bill,Activity):-likes (tom, Activity) .

goal

likes(bill, swimming).

  1. Результат работы программы

Задание 3.

  1. Условие задачи.

Перепишите программы, используя другой синтаксис для «присваивания» (не «:-»).

  1. Листинг программы

predicates

likes(symbol,symbol) clauses

likes(ellen,tennis).

likes(john,football).

likes(tom,baseball). likes(eric,swimming). likes(mark,tennis) .

likes(bill,Activity) if likes (tom, Activity) .

goal

likes(bill, baseball).

  1. Результат работы программы

Задание 4.

  1. Условие задачи.

Добавьте третью характеристику и присвойте новому человеку предпочтения уже имеющегося.

  1. Листинг программы

predicates

likes(symbol,symbol,symbol)

clauses

likes(ellen,tennis,veg).

likes(john,football,meat).

likes(tom,baseball,veg).

likes(eric,swimming,meat).

likes(mark,tennis,veg) .

likes(bill,Activity,Meat):-likes (tom, Activity,Meat) .

goal

likes(bill,baseball,veg).

  1. Результат работы программы

Задание 5.

  1. Условие задачи.

Напишите программу, которая будет выводить несколько предпочтений одного человека.

  1. Листинг программы

predicates

likes(symbol,symbol,symbol)

clauses

likes(ellen,tennis,veg).

likes(john,football,meat).

likes(tom,baseball,veg).

likes(eric,swimming,meat).

likes(mark,tennis,veg) .

likes(bill,Activity,Meat):-likes (tom, Activity,Meat) .

goal

write("Vvedite Imja: "), Readln(Name), nl,

write("Predpochtenija: "),nl,likes(X,Y,Z),X=Name,

write(Y," ",Z," "),nl,fail.

  1. Результат работы программы

Задание 6.

  1. Условие задачи.

Создайте запрос, которой спрашивает, чем увлекается конкретный человек (используйте данный первой программы).

  1. Листинг программы

predicates

likes(symbol,symbol)

clauses

likes(ellen,tennis).

likes(john,football).

likes(tom,baseball).

likes(eric,swimming).

likes(mark,tennis).

goal

write("Vvedite Imja: "), Readln(Name), nl,

write("Vvedite uvlechenie: "), Readln(Uvl),nl,

likes(X,Y),X=Name,Y=Uvl,write("yes"),nl,fail.

  1. Результат работы программы

Вывод

В процессе выполнения работы был изучена среда визуальной разработки Visual Prolog. Создан проект и запущен на выполнение. Предикат Like.

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]