- 1、本文档共7页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
《人工智能导论》实验报告
一、实验题目:识别型专家系统设计
————识别动物专家系统
二、实验目的
1、掌握专家系统的基本构成
2、掌握用人工智能程序设计语言编制智能程序的方法
三、实验内容
所选编程语言:C语言;
2.拟订的规则:
(1)()())()()()()(1)(1)(1)(1)(1)推理机是动物识别的逻辑控制器,它控制、协调系统的推理,并利用知识库中的规则对综合数据库中的数据进行逻辑操作。推理机担负两项基本任务:一是检查已有的事实和规则,并在可能的情况下增加新的事实;二是决定推理的方式和推理顺序。#include Fact.h
#include Rule.h
#include stdio.h
fact *Fact;
//事实集(概念集)
char *str[]={,
反刍 /* 1 */, 有蹄 /* 2 */, 哺乳类 /* 3*/,
眼前 /* 4 */, 有爪 /* 5 */, 犬齿 /* 6 */,
吃肉 /* 7 */, 下蛋 /* 8 */, 能飞 /* 9*/,
羽毛 /* 10 */, 有蹄类 /* 11 */, 食肉类 /* 12 */,
鸟类 /* 13 */, 有奶 /* 14 */, 毛发 /* 15 */,
善飞 /* 16 */, 黑色白条纹/* 17 */, 游泳 /* 18 */,
长腿 /* 19 */, 长脖子 /* 20 */, 黑条纹 /* 21 */,
暗斑点 /* 22 */, 黄褐色 /* 23 */, 海燕 /* 24 */,
企鹅 /* 25 */, 鸵鸟 /* 26 */, 斑马 /* 27 */,
长颈鹿 /* 28 */, 老虎 /* 29 */, 金钱豹 /* 30 */,
\0
};
//规则之前件(条件)集,注意与下面对应
int rulep[][6]={
{22,23,12,3,0,0}, /*金钱豹 30*/ {21,23,12,3,0,0}, /*老虎 29*/ {22,19,20,11,0,0}, /*长颈鹿 28*/
21,17,0,0,0,0}, /*斑马 27*/ {17,19,20,13,-9,0}, /*鸵鸟 26*/ {17,18,13,-9,0,0}, /*企鹅 25*/
{13,16,0,0,0,0}, /* 海燕24*/ {15,0,0,0,0,0}, /*哺乳类 3*/ {14,0,0,0,0,0}, /*哺乳类 3*/
{10,0,0,0,0,0}, /*鸟类 13*/ {8,9,0,0,0,0}, /*鸟类 13*/ {3,7,0,0,0,0}, /*食肉类 12*/
{3,4,5,6,0,0}, /*食肉类12*/ {3,2,0,0,0,0}, /*有蹄类 11*/ {3,1,0,0,0,0} /*有蹄类 11*/
};
//规则之后件(结论)集,注意与上面对应
int rulec[]={
30, 29, 28,
27, 26, 25,
24, 3, 3,
13, 13, 12,
12, 11, 11
}; //前7个是要识别的动物
int main()
{ fact *F,*T;
rule *Rule,*R;
char ch[8];
int i=1;
Fact=NULL; //事实链表初始为空
while(strcmp(str[i], \0)!=0) //在事实链表中填入事实,注意:前插入 { F=new fact(i,str[i++]);
F-Next=Fact;
Fact=F;
}
F=Fact;
Fact=NULL;
while(F)
{
文档评论(0)