66881

Продукційна модель представленнязнань

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

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

Вивчення представлення знань засобами С++ та ПАСКАЛЬ в рамках продукційної моделі. Папір - метод читання оптичний, обєм середній, перезапис неможливий. Перфокарта - метод читання оптичний, обєм малий, перезапис неможливий. ГМД - метод читання магнітний, обєм середній, перезапис можливий.

Украинкский

2014-11-30

39.3 KB

0 чел.

МІНІСТЕРСТВО ОСВІТИ І НАУКИ УКРАЇНИ

ТЕРНОПІЛЬСЬКИЙ НАЦІОНАЛЬНИЙ ТЕХНІЧНИЙ УНІВЕРСИТЕТ ІМЕНІ ІВАНА ПУЛЮЯ

Кафедра комп’ютерних наук

Лабораторна робота №2

Продукційна модель представленнязнань

Виконав:                                                                       студент групи СНc-33

Михалевич М.М.

Перевірив:

Фалендиш В.В.

Тернопіль 2011

Тема роботи:Продукційна модель представлення знань.

Мета роботи: Вивчення представлення знань засобами С++ та ПАСКАЛЬ в рамках продукційної моделі.

Завдання до лабораторноїроботи.

Варіант 6

Завдання: Розробити форму представлення знань для системи ідентифікації носіїв інформації.

Знання, представлені експертом: Папір - метод читання оптичний, обєм середній, перезапис неможливий. Перфокарта - метод читання оптичний, обєм малий, перезапис неможливий. ГМД - метод читання магнітний, обєм середній, перезапис можливий. ЖМД - метод читання магнітний, обєм великий, перезапис можливий. CD –метод читання оптичеий, обєм великий, перезапис неможливий.CDRW – метод читання оптичеий, обєм великий, перезапис можливий.DVD – метод читання оптичеий, обєм великий, перезапис можливий.DVRW – метод читання оптичеий, обєм великий, перезапис можливий. ПЗП – метод читання електронний, обєм великий, перезапис неможливий.

Вигляд форми програми

Текст програми:

unit Unit1;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, StdCtrls, ExtCtrls;

type

 TForm1 = class(TForm)

   Panel1: TPanel;

   Panel2: TPanel;

   Panel3: TPanel;

   Label1: TLabel;

   RadioButton1: TRadioButton;

   RadioButton2: TRadioButton;

   RadioButton3: TRadioButton;

   Label2: TLabel;

   RadioButton4: TRadioButton;

   RadioButton5: TRadioButton;

   RadioButton6: TRadioButton;

   Label3: TLabel;

   ComboBox1: TComboBox;

   Button1: TButton;

   GroupBox1: TGroupBox;

   Memo1: TMemo;

   ScrollBox1: TScrollBox;

procedure Button1Click(Sender:TObject);

private

   { Privatedeclarations }

public

   { Publicdeclarations }

end;

var

 Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender:TObject);

begin

if (RadioButton1.Checked=True)and(Radiobutton4.Checked=True)and

     (ComboBox1.ItemIndex=1) then

begin

     Memo1.Lines.Clear;

     Memo1.Lines.Add('Перфокарта');

end

elseif (RadioButton1.Checked=True)and(Radiobutton5.Checked=True)and

      (ComboBox1.ItemIndex=1) then

begin

     Memo1.Lines.Clear;

     Memo1.Lines.Add('Папір');

end

elseif (RadioButton1.Checked=True)and(Radiobutton6.Checked=True)and

      (ComboBox1.ItemIndex=0) then

begin

     Memo1.Lines.Clear;

     Memo1.Lines.Add('CDRW , DVDRW');

end

elseif (RadioButton1.Checked=True)and(Radiobutton6.Checked=True)and

      (ComboBox1.ItemIndex=1) then

begin

     Memo1.Lines.Clear;

     Memo1.Lines.Add('CD , DVD');

end

elseif (RadioButton2.Checked=True)and(Radiobutton5.Checked=True)and

      (ComboBox1.ItemIndex=0) then

begin

     Memo1.Lines.Clear;

     Memo1.Lines.Add('ГМД');

end

elseif (RadioButton2.Checked=True)and(Radiobutton6.Checked=True)and

      (ComboBox1.ItemIndex=0) then

begin

     Memo1.Lines.Clear;

     Memo1.Lines.Add('ЖМД');

end

elseif (RadioButton3.Checked=True)and(Radiobutton6.Checked=True)and

      (ComboBox1.ItemIndex=1) then

begin

     Memo1.Lines.Clear;

     Memo1.Lines.Add('ПЗП');

end

elsebegin

   Memo1.Lines.Clear;

   Memo1.Lines.Add('Тип обєктувизначити не можливо!');

   Memo1.Lines.Add('Перевіртеправильністтьвведенихданих і спробуйтеще раз!');

end;

end;

end.

Висновок: На цій лабораторній роботі я ознайомився з представленням знань засобами Delphi.


 

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

71751. Предикаты раздела WHERE оператора SELECT 55 KB
  Вводит данные в таблицу, заменяя при этом все записи, вызывающие конфликт. Этот оператор аналогичен INSERT за исключением того, что при конфликте нового значения с существующим уникальным ключом новое значение будет записано вместо старого. Первый вариант оператора просто вставит указанные...
71752. Введение в БД MySQL. Типы данных 85 KB
  Цель работы Ознакомление с базой данных MySQL: получение навыков запуска консоли для работы с MySQL корректного формирования и набора команд для работы с БД. Изучить имеющиеся типы данных для столбцов в базе данных MySQL освоить операции создания таблиц.
71753. Изменение таблицы. Выбор данных из таблиц 53 KB
  Оператор ALTER охватывает широкий набор действий, которые изменяют структуру таблицы. Этот оператор используется для добавления, изменения или удаления столбцов существующей таблицы, а также для удаления индексов. Несколько операторов ALTER могут быть объединены в одно предложение...
71754. Создание баз данных 112.5 KB
  Поскольку базы данных и таблицы MySQL хранятся как файлы файловой системы, вы столкнетесь с неприятными различиями - в поведении реализаций для Unix и Win32. Именно, все файловые системы для Win32 нечувствительны к регистру, в то время как файловые системы Unix различают регистр.
71755. ИЗУЧЕНИЕ КОНСТРУКЦИЙ ПОДШИПНИКОВ КАЧЕНИЯ 1.05 MB
  Цель работы: ознакомиться с классификацией и конструкциями основных типов подшипников качения. 1 Классификация подшипников качения Подшипники качения классифицируют по следующим основным признакам: направление действия воспринимаемых нагрузок форме тел качения конструктивным...
71756. Типы и конструкции подшипников качения 225.5 KB
  Ознакомиться с типами и конструкциями наиболее распространенных подшипников качения и их условными обозначениями. Изучить конструкцию трех различных подшипников (получить у преподавателя), начертить их эскиз, измерить и поставить габаритные размеры и расшифровать их условное обозначение.
71757. Электротехнические материалы: Методические указания 344 KB
  Цель работы: Экспериментальное исследование магнитных характеристик ферромагнитных материалов. Снятие кривой намагничивания и гистерезисных циклов. Определение по кривой намагничивания магнитной проницаемости и ее зависимость от напряженности магнитного поля.
71758. ОПРЕДЕЛЕНИЕ ВАТТМЕТРОВЫМ МЕТОДОМ МАГНИТНЫХ СВОЙСТВ ЭЛЕКТРОТЕХНИЧЕСКОЙ СТАЛИ 340.5 KB
  Методические указания к лабораторной работе №7 по курсу «Электротехнические материалы» для студентов специальности 1-53 01 05 «Автоматизированные электроприводы» - ГУ ВПО «Белорусско-Российский университет», 2005 г. Методические указания содержат основные сведения о магнитных свойствах электротехнической стали.
71759. МАТЕРИАЛОВЕДЕНИЕ (Часть 2) 2.94 MB
  Изложены основные теоретические положения и методические указания к выполнению следующих лабораторных работ по курсу Материаловедение: Изучение зависимости между структурой и свойствами чугунов Закалка стали Отпуск закаленной стали Изучение зависимости между структурой и свойствами стали...