Автор работы: Пользователь скрыл имя, 21 Октября 2013 в 09:18, курсовая работа
Цели работы: разработать модель ЭС предназначенной для выбора автомобиля для семьи.
В связи с поставленной целью можно сформулировать следующие задачи:
1. Изучение литературы;
2. Изучение рынка автомобилей;
3. Изучение основных характеристик автомобилей;
4. Создание базу данных по изучаемому вопросу;
5. Реализация модели ЭС в среде VisualStudio 2012 на языке Basic.
Введение 3
Раздел 1Экспертные системы 4
1.1 Основные понятия ЭС 4
1.2 История развития ЭС 7
1.3 Классификация ЭС 11
1.4 Структура ЭС 17
1.5 Правила логического вывода ЭС 20
Раздел 2 Среда программирования 21
Раздел 3 Предметная область 23
4.1 Создание программы 25
Заключение 31
Список использованной литературы 32
Приложение 1 Исходный код программы 33
Приложение 2 Результаты тестирования 38
If strana = "Япония" And cena = " 450 000 "And cvet = "Синий" Then MsgBox("По вашему запросу ничего не найдено")
If strana = "Япония" And cena = " 600 000 "And cvet = "Синий" Then MsgBox("По вашему запросу ничего не найдено")
If strana = "Япония" And cena = " 300 000 "And cvet = "Металлик" Then MsgBox("По вашему запросу ничего не найдено")
If strana = "Япония" And cena = " 450 000 "And cvet = "Металлик" Then MsgBox("По вашему запросу ничего не найдено")
If strana = "Германия" And cena = " 300 000 "And cvet = "Красный" Then MsgBox("По вашему запросу ничего не найдено")
If strana = "Германия" And cena = " 450 000 "And cvet = "Красный" Then MsgBox("По вашему запросу ничего не найдено")
If strana = "Германия" And cena = " 300 000 "And cvet = "Синий" Then MsgBox("По вашему запросу ничего не найдено")
If strana = "Германия" And cena = " 450 000 "And cvet = "Синий" Then MsgBox("По вашему запросу ничего не найдено")
If strana = "Германия" And cena = " 450 000 "And cvet = "Металлик" Then MsgBox("По вашему запросу ничего не найдено")
If strana = "Германия" And cena = " 600 000 "And cvet = "Металлик" Then MsgBox("По вашему запросу ничего не найдено")
EndSub
EndClass
№ |
Параметр 1 страна производитель |
Параметр 2 Цена |
Параметр 3 Цвет |
Ожидаемый результат |
Фактический результат |
1 |
Россия |
600000 |
Красный |
Нет таких |
Нет таких |
2 |
Япония |
300000 |
Красный |
Есть |
Есть |
3 |
Япония |
450000 |
Синий |
Нет таких |
Нет таких |
4 |
Германия |
300000 |
Красный |
Нет таких |
Нет таких |
5 |
Германия |
300000 |
Металлик |
Есть |
Есть |