Основы построения и функционирования интеллектуальных информационных систем. Былкин В.Д - 205 стр.

UptoLike

ВУЗ: 

ПГУ | Пенза

Составители: 

Рубрика: 

205
Окончание прил.
else showmessage('He бойтесь, это не точные данные! . :)) '+chr(10)+ 'npoграммка-то учебная!');
}
s_object:=
'
чайник';
for_me.Caption:база знаний: поиск типа '+s_object+'a';
if s_object <> " then
begin
pursue(s_object);
p_result(s_object);
ShowMessage(
,
УPA! Мы нашли, что такой чайник есть! '+chr( 10)+chr(
10)+besa[besa_int]);
END
END;
procedure Tfor__me.aboutClick( Sender: TObject);
begin
ShowMessage('Экспертная система обрабатывает символическое '+
сhr(10)+
'представление реальности с помощью эвристических правил, '+
chr(10)+
'обычно с помощью метола обратной цепочки
Р
В этом методе '+
chr(10)+
'консультация начинается с определения конкретной цели или '+
chr(10)+
'конечного результата... Вот так. '+chr (10)+chr( 10)+
Разработана хорошими людьми из группы ИСТ-41
(2005)
'+
chr(10)+chr(10)+
'Контактные данные: http: / /rfl.nm.ru'+chr(10)+
raaaf@yandex.ru
'
+chr(10)+
rfl@nm.ru4chr(10)+
ICQ #3111645');
end;
procedure Tfor_me.N1Click(Sender: TObject); begin
for_me.Close;
end;
end. 
                                                                              Окончание прил.
else showmessage('He бойтесь, это не точные данные! . :)) '+chr(10)+ 'npoграммка-то учебная!');
}
s_object:= 'чайник';
for_me.Caption:база знаний: поиск типа '+s_object+'a';
if s_object <> " then
    begin
    pursue(s_object);
    p_result(s_object);
       ShowMessage(,УPA! Мы нашли, что такой чайник есть! '+chr( 10)+chr(
10)+besa[besa_int]);
    END
     END;
procedure Tfor__me.aboutClick( Sender: TObject);
begin
ShowMessage('Экспертная система обрабатывает символическое '+
сhr(10)+
'представление реальности с помощью эвристических правил, '+
chr(10)+
'обычно с помощью метола обратной цепочки Р В этом методе '+
chr(10)+
'консультация начинается с определения конкретной цели или '+
chr(10)+
'конечного результата... Вот так. '+chr (10)+chr( 10)+
Разработана хорошими людьми из группы ИСТ-41
(2005) '+chr(10)+chr(10)+
'Контактные данные: http: / /rfl.nm.ru'+chr(10)+
               [email protected]'+chr(10)+
               [email protected](10)+
               ICQ #3111645');
                 end;
procedure Tfor_me.N1Click(Sender: TObject); begin
for_me.Close;
end;
end.



                                                205

Страницы