50857

Система COMP-P(Expert COMPonent for the Pascal-oriented tool) и построение исполняемого модуля в Borland Delphi

Лабораторная работа

Информатика, кибернетика и программирование

Ознакомьтесь с примером из папки Exmples Steklo. Запустите программу COMPP версия 3 smll и откройте пример steklo. Рассмотрим проект ksteklo. Проект содержит модули формы steklo1.

Русский

2014-01-31

149 KB

6 чел.

Лабораторная работа №1

Целью данной лабораторной работы является знакомство с системой COMP-P(Expert COMPonent for the Pascal-oriented tool) и построение исполняемого модуля в Borland Delphi.

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

Порядок выполнения работы

1. Ознакомьтесь с примером из папки Examples\Steklo.

Ответив только на три вопроса и запустив процедуру логического вывода,

Вы получите значения вспомогательных и целевой переменных.

Трассировка позволяет проследить логический вывод.

2. Запустите программу «COMP-P версия 3 small» и откройте пример «steklo.set».

Закладка «текст набора правил» содержит описание базы знаний.

Выполните команду «Компиляция/Выполнить компиляцию». В закладке «Pascal модуль» сгенерируется код для модуля проекта Delphi.

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

3. Рассмотрим проект ksteklo.dpr.

Проект содержит модули формы steklo1.pas, steklo1.dfm и модуль логического вывода steklo.pas.

  •  Модуль формы «steklo1» предназначен для диалога с пользователем и создается разработчиком приложения.
  •  Модуль «steklo» содержит базу знаний и создается автоматически программой COMP-P.

К модулю формы подключена библиотека «cp3_iesm» и файл проекта «steklo».

В процедуре Button1Click задаются начальные значения переменных логического вывода из модуля «steklo».

   kach:=0;

   odnor:=0;

   polos:=0;

   vspen:=0;

   nalser:=0;

   osv:=0;

   //***********************

   zerns:=RG1.ItemIndex+1;

   vlagn:=RG2.ItemIndex+1;

   sodg:=RG3.ItemIndex+1;

Параметры esSetReasonMode  и esSetReasonMode из библиотеки «cp3_iesm»   задают режим логического вывода.

   if CBox1.Checked then esSetReasonMode:=1

   else esSetReasonMode:=0;

   if CBox2.Checked then esSetTrassMode:=1

   else esSetTrassMode:=0;

   if CBox3.Checked then

       esSetTrassMode:=esSetTrassMode+2;

Вызывается функция  логического вывода из модуля «steklo».

_steklo;

Далее на форму выводятся значения переменных логического вывода.

//*******************************************

   Label1.Caption:=t_nalser[nalser];

//*******************************************

   Label2.Caption:=t_polos[polos];

//*******************************************

   Label3.Caption:=t_osv[osv];

//*******************************************

   Label4.Caption:=t_vspen[vspen];

//*******************************************

   Label5.Caption:=t_odnor[odnor];

//*******************************************

   ST6.Caption:=t_kach[kach];


 

А также другие работы, которые могут Вас заинтересовать

16885. Эволюция надеется, что вы не знаете химию: проблема с хиральностью 63.5 KB
  Эволюция надеется что вы не знаете химию: проблема с хиральностью Чарлз Маккомб Когда в 1953 году появился газетный заголовок Жизнь в пробирке сообщество эволюционистов пришло в восторг. Работа Миллера рассматривалась ими как научное доказательство того что жизнь ...
16886. Эволюция – религия, а не наука 49 KB
  Эволюция – религия а не наука В двух своих предыдущих статьях [12] автор задокументировал с признаний эволюционистов тот факт что идея эволюции от молекулы к человеку не соответствует критериям научной теории. Не существует ни одного эволюционного перехода переходн
16887. Свидетельство химии о сотворении 53 KB
  Свидетельство химии о сотворении Эдвард А. Бордо Большинство доводов из области химии выдвигаемых против теории эволюции и в поддержку сотворения акцентируют внимание на биохимическом ракурсе проблемы происхождения жизни. Хотя никто и не говорит что эти биохимич...
16888. ОПТИМИЗАЦИЯ ФОРМЫ КОРПУСНЫХ ДЕТАЛЕЙ МЕТАЛЛОРЕЖУЩИХ СТАНКОВ С ПОМОЩЬЮ ПРОГРАММЫ ANSYS 127 KB
  ОПТИМИЗАЦИЯ ФОРМЫ КОРПУСНЫХ ДЕТАЛЕЙ МЕТАЛЛОРЕЖУЩИХ СТАНКОВ С ПОМОЩЬЮ ПРОГРАММЫ ANSYS Описана процедура оптимизации формы корпуса шпиндельной бабки токарного станка. Задача оптимизации заключалась в нахождении таких толщин стенок корпуса при которых он бы имел макси
16889. Расчет силовых смещений корпуса шпиндельной бабки токарного станка 119 KB
  Расчет силовых смещений корпуса шпиндельной бабки токарного станка 1.Описание конструкции шпиндельной бабки токарного станка 16К20 Шпиндельная бабка токарного станка 16К20 предназначена для базирования подшипников шпинделя а также для передачи вращения от шкива ремен
16890. Основные настройки текстового процессора Writer 144.5 KB
  Лабораторная работа №1 Основные настройки текстового процессора Writer Оборудование: ПК Программное обеспечение: Windows OpenOffice.org Writer. Цель работы: приобретение и закрепление практических навыков работы во Writer Теоретическая часть. Для корректной работы OpenOffice с русским я
16891. Основные операции по форматированию текстовых документов в OpenOfficeorg Writer 57 KB
  Лабораторная работа №2Основные операции по форматированию текстовых документов в OpenOffice.org Writer Оборудование: ПК Программное обеспечение: Windows OpenOffice.org Writer. Цель работы: приобретение и закрепление практических навыков работы в OpenOffice.org Writer Указания к выполнению работы:...