Отчет по лабораторной (1084662), страница 3
Текст из файла (страница 3)
Покупатель.Предпочтение := 'Последняя модель'
Покупатель.Сумма := 5000
===== Параметры АНАЛИЗА =====
Выбор_компьютера(Покупатель, Компьютер, Магазин) := false
Достаточное_количество_денег(Покупатель) := false
Компьютер.Видеокарта := Значение неизвестно
Компьютер.Жесткий_диск := Значение неизвестно
Компьютер.Монитор := Значение неизвестно
Компьютер.Привод := Значение неизвестно
Компьютер.Процессор := Значение неизвестно
Компьютер.Тип := Значение неизвестно
Магазин.Тип_компьютера := Значение неизвестно
Магазин.Цена := Значение неизвестно
Правильное_предпочтение(Покупатель, Компьютер) := false
**********************************
*** Шаблон целевой ситуации ***
===== Параметры УЧЕТА =====
Покупатель.Предпочтение -- Значение неважно
Покупатель.Сумма -- Значение неважно
===== Параметры АНАЛИЗА =====
Выбор_компьютера(Покупатель, Компьютер, Магазин) = true
Достаточное_количество_денег(Покупатель) -- Значение неважно
Компьютер.Видеокарта -- Значение неважно
Компьютер.Жесткий_диск -- Значение неважно
Компьютер.Монитор -- Значение неважно
Компьютер.Привод -- Значение неважно
Компьютер.Процессор -- Значение неважно
Компьютер.Тип -- Значение неважно
Магазин.Тип_компьютера -- Значение неважно
Магазин.Цена -- Значение неважно
Правильное_предпочтение(Покупатель, Компьютер) -- Значение неважно
********************************
НАЧИНАЕМ ПРОЦЕСС ЛОГИЧЕСКОГО ВЫВОДА
ПРИМЕНЯЕМ Правило-Действие: "Достаточное_количество_денег_у_покупателя":
Достаточное количество денег у покупателя для покупки компьютера
*** После применения правила имеем ситуацию ***
===== Параметры УЧЕТА =====
Покупатель.Предпочтение := 'Последняя модель'
Покупатель.Сумма := 5000
===== Параметры АНАЛИЗА =====
Выбор_компьютера(Покупатель, Компьютер, Магазин) := false
Достаточное_количество_денег(Покупатель) := true
Компьютер.Видеокарта := Значение неизвестно
Компьютер.Жесткий_диск := Значение неизвестно
Компьютер.Монитор := Значение неизвестно
Компьютер.Привод := Значение неизвестно
Компьютер.Процессор := Значение неизвестно
Компьютер.Тип := Значение неизвестно
Магазин.Тип_компьютера := Значение неизвестно
Магазин.Цена := Значение неизвестно
Правильное_предпочтение(Покупатель, Компьютер) := false
*************************************************
ПРИМЕНЯЕМ Правило-Действие: "Последняя_модель_предпочтительна_для_покупателя":
Для покупателя предпочтительна последняя модель
*** После применения правила имеем ситуацию ***
===== Параметры УЧЕТА =====
Покупатель.Предпочтение := 'Последняя модель'
Покупатель.Сумма := 3500
===== Параметры АНАЛИЗА =====
Выбор_компьютера(Покупатель, Компьютер, Магазин) := false
Достаточное_количество_денег(Покупатель) := true
Компьютер.Видеокарта := Значение неизвестно
Компьютер.Жесткий_диск := Значение неизвестно
Компьютер.Монитор := Значение неизвестно
Компьютер.Привод := Значение неизвестно
Компьютер.Процессор := Значение неизвестно
Компьютер.Тип := Значение неизвестно
Магазин.Тип_компьютера := 'последний писк'
Магазин.Цена := 1500
Правильное_предпочтение(Покупатель, Компьютер) := true
*************************************************
ПРИМЕНЯЕМ Правило-Действие: "Компьютер_для_последней_модели":
Выбор компьютера для последней модели
*** После применения правила имеем ситуацию ***
===== Параметры УЧЕТА =====
Покупатель.Предпочтение := 'Последняя модель'
Покупатель.Сумма := 3500
===== Параметры АНАЛИЗА =====
Выбор_компьютера(Покупатель, Компьютер, Магазин) := true
Достаточное_количество_денег(Покупатель) := true
Компьютер.Видеокарта := 'Radeon 9800 XT'
Компьютер.Жесткий_диск := '120 Гбайт'
Компьютер.Монитор := 'TFT 17"'
Компьютер.Привод := 'DVD-ROM/CD-RW'
Компьютер.Процессор := 'Intel 3,2'
Компьютер.Тип := 'высокой производительности'
Магазин.Тип_компьютера := 'последний писк'
Магазин.Цена := 1500
Правильное_предпочтение(Покупатель, Компьютер) := true
*************************************************
Ц Е Л Е В А Я С И Т У А Ц И Я Д О С Т И Г Н У Т А.
===== Параметры УЧЕТА =====
Покупатель.Предпочтение := 'Последняя модель'
Покупатель.Сумма := 3500
===== Параметры АНАЛИЗА =====
Выбор_компьютера(Покупатель, Компьютер, Магазин) := true
Достаточное_количество_денег(Покупатель) := true
Компьютер.Видеокарта := 'Radeon 9800 XT'
Компьютер.Жесткий_диск := '120 Гбайт'
Компьютер.Монитор := 'TFT 17"'
Компьютер.Привод := 'DVD-ROM/CD-RW'
Компьютер.Процессор := 'Intel 3,2'
Компьютер.Тип := 'высокой производительности'
Магазин.Тип_компьютера := 'последний писк'
Магазин.Цена := 1500
Правильное_предпочтение(Покупатель, Компьютер) := true
П Р О Ц Е С С П О И С К А Р Е Ш Е Н И Я З А К О Н Ч Е Н.
Время работы = 15 мс
16