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.


 

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

10126. Реестр. Пакетный файл. Совместное использование ресурсов 42.5 KB
  Реестр. Реестр иерархически построенная база данных параметров и настроек в большинстве операционных систем Microsoft Windows.Реестр содержит информацию и настройки для аппаратного обеспечения программного обеспечения профилей пользователей предустановки. Большинство из...
10127. Предмет философии науки и ее место в науковедении 96 KB
  Предмет философии науки и ее место в науковедении ПРЕДМЕТ ФИЛОСОФИИ НАУКИ Сейчас в конце двадцатого века бросая взгляд в прошлое мы можем с уверенностью сказать что ни одна сфера духовной культуры не оказала столь существенного и динамичного влияния на обществ
10128. Структура современного науковедения и место в нем философии науки 47.5 KB
  Предмет философии науки и ее место в науковедении Философия науки как направление современной философии представлена множеством оригинальных концепций предлагающих ту или иную модель развития науки. Она сосредоточена на выявлении роли и значимости науки характ
10129. Предпосылки и историческое формирование науковедения и философии науки 46 KB
  Предпосылки и историческое формирование науковедения и философии науки Проблематика науковедения и его становление. Структура современного науковедения и место в нем философии науки. Философия науки изучение которой начинается является частью обширной об
10130. Образ науки в философии Аристотеля 37 KB
  Образ науки в философии Аристотеля. Первое приближение к такому подходу обнаруживаем у Аристотеля поскольку он структурирует познание. В Метафизике вопервых он разграничивает знание опыт и искусство. Опыт есть знание единичного а искусство  знание общ
10131. Образ науки в философии Ф. Бэкона 35.5 KB
  Образ науки в философии Ф. Бэкона В классической методологии Нового времени Ф. Бэкон обращается к образу науки как настоящей или новой науки в противоположность средневековой схоластике. Наука в подлинном смысле еще не появилась настоящую науку предстоит созд...
10132. Образ науки в философии И.Канта 33.5 KB
  Образ науки в философии И.Канта. И. Кант поставил проблему общей природы научного знания. Наука рассматривается изнутри с точки зрения логики развертывания мысли и сформулирована фундаментальная проблема: научное знание обладает всеобщностью и необходимостью эт
10133. Образ науки в философии позитивизма 50 KB
  Образ науки в философии позитивизма. В ХIХ в. О.Конт Дж. Милль Г.Спенсер разрабатывают позитивистскую концепцию науки. Позитивистский образ науки характеризуют: а представление о науке как эталоне познания радикальный сциентизм, б идея строгости и точности нау...
10134. Образ науки в философии неопозитивизма 38 KB
  Образ науки в философии неопозитивизма Следующая важная веха в формировании науковедения связана с неопозитивизмом в п.о. с деятельностью Венского Главой кружка был Морис Шлик входили в него Отто Нейрат Курт Гёдель Карл Гемпель Филипп Франк Альфред Айер Рудоль