Экспертные системы

В ЭС, базирующейся на логике, трансформированные запросы являются значениями, которые сопоставляются со списками значений, находящихся  в утверждениях БЗ.

Как в системе, базирующейся на правилах, так и в системе, базирующейся на логике, пользователь получает ответы на свои запросы в соответствии с  заложенной в ЭС логикой. Для программной  реализации механизма вывода экспертного  заключения достаточно только написать необходимые спецификации. 

Раздел 2 Среда программирования

 

Microsoft Visual Basic - средство разработки программного обеспечения, разрабатываемое корпорацией Microsoft и включающее язык программирования и среду разработки. Язык Visual Basic унаследовал дух, стиль и отчасти синтаксис своего предка – языка Basic, у которого есть немало диалектов. В то же время Visual Basic сочетает в себепроцедурыи элементыобъектно-ориентированныхикомпонентно-ориентированныхязыков программирования. Среда разработки VB включает инструменты для визуального конструирования пользовательского интерфейса.

Visual Basic считается хорошимсредством  быстрой разработкипрототипов программы,  для разработки приложений баз  данных и вообще для компонентного  способа создания программ, работающих  под управлением операционных  систем семействаMicrosoft Windows.

Первое признание серьёзными разработчиками Visual Basic получил после  выхода версии 3 - VB3. Окончательное признание как полноценного средства программирования для Windows— при выходе версии 5— VB5. Версия VB6, входящая в составMicrosoft Visual Studio6.0, стала по-настоящему зрелым и функционально богатым продуктом. После этого разработчики из Microsoft существенно изменили направление развития данной технологии.

Visual Basic .NETне позволяет  программировать по-старому, потому  что, по сути, является совершенно другим языком, таким же, как и любой другой язык программирования для платформы.NET. Индивидуальность языка, так же как и его преимущества (простота, скорость создания программ, лёгкость использования готовых компонентов) при использовании в среде .NET не имеют такого значения, как раньше— всё сосредоточено на возможностях самой системы .NET, на её библиотеке классов. Поэтому сегодня (октябрь 2012 года) нужно говорить о классическом Visual Basic, его диалектахVisual Basic for Applications(VBA) иVisual Basic Scripting Edition(VBScript) и о языке для платформы .NET - Visual Basic .NET.

Основные разновидности  VisualBasic

Классический Visual Basic (версии 5-6)

Этот язык очень сильно привязан к своей среде разработки и к операционной системе Windows, являясь  исключительно инструментом написания Windows-приложений. Привязка к среде  заключается в том, что существует большое количество средств, предназначенных  для помощи и удобства программирования: встроенный отладчик, просмотр переменных и структур данных на лету, окно отладки, всплывающая подсказка при наборе текста программы (IntelliSense). Все эти  преимущества делают бесполезным и  даже невозможным использование Visual Basic вне среды разработки, например в обычном текстовом редакторе.

Visual Basic for Applications (VBA)

Это средство программирования, практически ничем не отличающееся от классического Visual Basic, которое предназначено  для написаниямакросови других прикладных программ для конкретных приложений. Наибольшую популярность получил благодаря  своему использованию в пакетеMicrosoft Office. Широкое распространение Visual Basic for Applications в сочетании с изначально недостаточным вниманием к вопросам безопасности привело к широкому распространениюмакровирусов.

Visual Basic Scripting Edition (VBScript)

Скриптовый язык, являющийся несколько усечённой версией обычного Visual Basic. Используется в основном для автоматизации администрирования системWindows, а также для создания страницASPи сценариев дляInternet Explorer.

 

Раздел 3 Предметная область

 

Вместительность (Городской – сравнительно небольшой объем багажника, Дачный - более повышенный объем багажника, Загородный – максимальное количество пассажирских мест и еще более объемный багажный отсек).

Уровень комфорта и безопасности (отечественный более низкий, иностранный, как правило, более высокий).

Стоимость (подержанный, как  правило, недорогой, новый более  дорогостоящий автомобиль).

Класс автомобиля (внедорожник, универсал, мини-вэн, седан или автомобиль экономного класса).

Страна производитель (самые  массовые производители – Россия, Япония, США, Южная Корея, Франция, Германия, Великобритания, Италия).

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

Экспертная система «Автомобили для семьи» разработана для того, чтобы пользователь, перед тем как пойти в автосалон для приобретения автомобиля, смог заранее узнать какие характеристики ему необходимы.[1][6]

Ответив на ряд простых вопросов о том, для какой цели нужен автомобиль, какая марка и производитель предпочтительней, о приделах какой цены может идти речь, цвет автомобиля и ряд других критериев.

Сообщив эти характеристики продавцу-консультанту, пользователь сможет выбрать из предложенных автомобилей тот, который ему больше нравится по внешнему виду. Параметры и варианты выбора автомобилей приведены в таблице 3.[2][5]

 

Таблица 3

Параметры	Варианты выбора
Страна производитель	Россия, Япония, Германия
Цена	300000, 450000, 600000
Цвет	Красный, Синий, Металлик

 

 

4.1 Создание программы

 

В данной курсовой работе создается  ЭС предназначенная для автомобилей для семьи.

Реализация данного проекта осуществляется в среде программирования VisualStudioна языке VisualBasic.

Первый этап программы начинается с “создания проекта”, это показано на рисунке.

 

После появляется окно, которое видим на рисунке и там нужно выбрать пункт “Приложение WindowsForm”.

 

 

 

 

 

 

 

 

После создания Приложения, начинается создание самой программы.

 

Если быть точнее то именно в окне, которое называется “форма”.

 

Со временем на эту форму наносятся  объекты, которые находятся слева на панели инструментов, указанные на рисунке.

После нанесения объектов на форму  их можно редактировать, меняя: размеры, цвет, вид и т.п., которые находятся  справа в меню свойства, указанные  на рисунке.

 

После нанесения на форму объектов и установления их свойств, начинается этап, прописывания кодов в окне.

 

 

И в завершении всей работы, когда  все сделано правильно, каждый программист с радостью нажимает на кнопку “Запуск”, которая находится на главном меню программы, указанная на рисунке.

 

 

Заключение

 

Предметом нашего исследования являлась экспертная система (ЭС), замечательное  и стремительно развивающееся направление  в области искусственного интеллекта (ИИ). Основное достоинство ЭС в том, что она позволяет  накапливать  и сохранять знания. Возможности  применения ЭС очень высоки, так  как они позволяют решать многочисленные задачи, возникающие в различных  областях человеческой деятельности.

Цель курсовой работы: разработать  модель ЭС предназначенной для выбора автомобиля для семьи, изучить методы построения базы знаний. Задачи, сформулированные в связи с поставленной целью  выполнены в полном объеме: литература по вопросам проанализирована, что  дало нам возможность проследить развитие ЭС, требования к ним, классификацию  и этапы разработки.

Рынок автомобилей и основные характеристики автомобилей изучены, создана база данных по изучаемому вопросу и реализована  модель экспертной системы в среде  VisualStudio 2012 на языке Basic. Итоги работы показывают ее результативность в достижении цели и решении задач темы.

К немногочисленным недостаткам  программы нужно отнести небольшой  объем базы знаний и упрощенное оформление, что объясняется учебной целью  данной работы, для более развернутого проекта необходим дополнительный ряд параметров, увеличение количества вариантов и более привлекательное  внешнее оформление.

 

Список использованной литературы

 

1. Cars. Автомобили: Мартин Деррик — Санкт-Петербург, Фактор, 2010 г.- 304 с.
2. Автомобили мира, 2008: — Москва, Третий Рим, 2008 г.- 256 с.
3. Джозеф Джарратано, Гари Райли «Экспертные системы: принципы разработки и программирование»: Пер. с англ. — М.: Издательский дом «Вильямс», 2006. — 1152 стр. с ил.
4. Джексон Питер. Введение в экспертные системы. - СПб.: Издательский дом «Вильямс», 2001.
5. Частиков А.П., Гаврилова Т.А., Белов Д.Л. Разработка экспертных систем. - СПб.: БХВ-Петербург, 2003.
6. К. Нейлор. Как построить свою экспертную систему.- М.: Энегроатомиздат, 2007.
7. Д. Джарратано, Г. Райли. Экспертные системы. Принципы разработки и программирование. Изд. Вильямс, 2006.
8. В.О. Сафонов. Экспертные системы – интеллектуальные помощники специалистов. – СПб.: Санкт-Петербургская организация общества «Знания Росси», 2007.
9. Г. Долин. Что такое ЭС. – Компьютер Пресс, 2002 г.

 

Приложение 1 Исходный код программы

 

PublicClassForm3

PrivateSub Button1_Click(sender AsObject, e AsEventArgs) Handles Button1.Click

Me.Hide()

Form4.Show()

EndSub

PrivateSub Button2_Click(sender AsObject, e AsEventArgs) Handles Button2.Click

Me.Hide()

Form5.Show()

EndSub

PrivateSub Button3_Click(sender AsObject, e AsEventArgs) Handles Button3.Click

Me.Hide()

Form6.Show()

EndSub

PrivateSub Button4_Click(sender AsObject, e AsEventArgs) Handles Button4.Click

Me.Hide()

Form7.Show()

EndSub

PrivateSub Button5_Click(sender AsObject, e AsEventArgs) Handles Button5.Click

Me.Hide()

Form8.Show()

EndSub

PrivateSub Button6_Click(sender AsObject, e AsEventArgs) Handles Button6.Click

Me.Hide()

Form9.Show()

EndSub

PrivateSub Button7_Click(sender AsObject, e AsEventArgs) Handles Button7.Click

Me.Hide()

Form10.Show()

EndSub

PrivateSub Button8_Click(sender AsObject, e AsEventArgs) Handles Button8.Click

Me.Hide()

Form11.Show()

EndSub

PrivateSub Button9_Click(sender AsObject, e AsEventArgs) Handles Button9.Click

Me.Hide()

Form12.Show()

EndSub

PrivateSub Button10_Click(sender AsObject, e AsEventArgs) Handles Button10.Click

End

EndSub

PrivateSub ComboBox1_SelectedIndexChanged(sender AsObject, e AsEventArgs) Handles ComboBox1.SelectedIndexChanged

EndSub

PrivateSub Button11_Click(sender AsObject, e AsEventArgs) Handles Button11.Click

DimstranaAsString

DimcvetAsString

DimcenaAsInteger

strana = ComboBox1.Text

cena = ComboBox2.Text

cvet = ComboBox3.Text

If strana = "Россия"And cena = " 300 000 "And cvet = "Красный"Then

Me.Hide()

Form43.Show()

EndIf

If strana = "Россия"And cena = " 450 000 "And cvet = "Красный"Then

Me.Hide()

Form44.Show()

EndIf

If strana = "Япония"And cena = " 300 000 "And cvet = "Красный"Then

Me.Hide()

Form45.Show()

EndIf

If strana = "Япония"And cena = " 600 000 "And cvet = "Красный"Then

Me.Hide()

Form46.Show()

EndIf

If strana = "Германия"And cena = " 600 000 "And cvet = "Красный"Then

Me.Hide()

Form47.Show()

EndIf

If strana = "Россия"And cena = " 450 000 "And cvet = "Синий"Then

Me.Hide()

Form48.Show()

EndIf

If strana = "Россия"And cena = " 600 000 "And cvet = "Синий"Then

Me.Hide()

Form49.Show()

EndIf

If strana = "Япония"And cena = " 300 000 "And cvet = "Синий"Then

Me.Hide()

Form50.Show()

EndIf

If strana = "Германия"And cena = " 600 000 "And cvet = "Синий"Then

Me.Hide()

Form51.Show()

EndIf

If strana = "Россия"And cena = " 450 000 "And cvet = "Металлик"Then

Me.Hide()

Form52.Show()

EndIf

If strana = "Япония"And cena = " 600 000 "And cvet = "Металлик"Then

Me.Hide()

Form53.Show()

EndIf

If strana = "Германия"And cena = " 300 000 "And cvet = "Металлик"Then

Me.Hide()

Form54.Show()

End If

If strana = "Россия"And cena = " 600 000 "And cvet = "Красный" Then MsgBox("По вашему запросу ничего не найдено")

If strana = "Россия" And cena = " 300 000 "And cvet = "Синий" Then MsgBox("По вашему запросу ничего не найдено")

If strana = "Россия" And cena = " 300 000 "And cvet = "Металлик" Then MsgBox("По вашему запросу ничего не найдено")

If strana = "Россия" And cena = " 600 000 "And cvet = "Металлик" Then MsgBox("По вашему запросу ничего не найдено")

If strana = "Япония" And cena = " 450 000 "And cvet = "Красный" Then MsgBox("По вашему запросу ничего не найдено")