人工智能小型動(dòng)物分類專家系統(tǒng)的設(shè)計(jì)與實(shí)現(xiàn)PPT

1、如有幫助，歡迎下載。 小型動(dòng)物分類專家系統(tǒng)的設(shè)計(jì)與實(shí)現(xiàn) 一、實(shí)驗(yàn)?zāi)康?通過(guò)本實(shí)驗(yàn)可使學(xué)生能夠綜合利用 C語(yǔ)言（或C+）、面向?qū)ο蟪绦蛟O(shè)計(jì)、數(shù) 據(jù)結(jié)構(gòu)、數(shù)據(jù)庫(kù)原理、人工智能、軟件工程等課程的相關(guān)知識(shí)，設(shè)計(jì)并實(shí)現(xiàn)小型 動(dòng)物分類專家系統(tǒng)，培養(yǎng)學(xué)生綜合運(yùn)用所學(xué)計(jì)算機(jī)軟件知識(shí)解決實(shí)際問(wèn)題的能 力，為今后從事計(jì)算機(jī)軟件開(kāi)發(fā)及應(yīng)用打下基礎(chǔ)。 二、實(shí)驗(yàn)內(nèi)容 運(yùn)用下列規(guī)則，設(shè)計(jì)并實(shí)現(xiàn)一個(gè)小型動(dòng)物分類專家系統(tǒng)。 規(guī)則 1： 如果：動(dòng)物有毛發(fā) 則 ：該動(dòng)物是哺乳動(dòng)物 規(guī)則 2： 如果：動(dòng)物有奶 則 ：該單位是哺乳動(dòng)物 規(guī)則 3: 如果：該動(dòng)物有羽毛 則 ：該動(dòng)物是鳥(niǎo) 規(guī)則 4： 如果：動(dòng)物會(huì)飛，且會(huì)下蛋 則 ：該動(dòng)

2、物是鳥(niǎo) 規(guī)則 5： 如果：動(dòng)物吃肉 則 ：該動(dòng)物是肉食動(dòng)物 規(guī)則 6： 如果：動(dòng)物有犬齒，且有爪，且眼盯前方 則 ：該動(dòng)物是食肉動(dòng)物 規(guī)則 7： 如果：動(dòng)物是哺乳動(dòng)物，且有蹄 則 ：該動(dòng)物是有蹄動(dòng)物 規(guī)則 8： 如果：動(dòng)物是哺乳動(dòng)物，且是反芻動(dòng)物 則 ：該動(dòng)物是有蹄動(dòng)物 規(guī)則 9： 如果：動(dòng)物是哺乳動(dòng)物，且是食肉動(dòng)物，且是黃褐色的，且有暗斑點(diǎn) 則 ：該動(dòng)物是豹 規(guī)則 10： 如果：如果：動(dòng)物是黃褐色的，且是哺乳動(dòng)物，且是食肉，且有黑條紋 則 ：該動(dòng)物是虎 規(guī)則 11： 如果：動(dòng)物有暗斑點(diǎn)，且有長(zhǎng)腿，且有長(zhǎng)脖子，且是有蹄類 則 ：該動(dòng)物是長(zhǎng)頸鹿 規(guī)則 12： 如果：動(dòng)物有黑條紋，且是有蹄類動(dòng)物

3、則 ：該動(dòng)物是斑馬 規(guī)則 13： 如果：動(dòng)物有長(zhǎng)腿，且有長(zhǎng)脖子，且是黑色的，且是鳥(niǎo)，且不會(huì)飛 則 ：該動(dòng)物是鴕鳥(niǎo) 規(guī)則 14： 如果：動(dòng)物是鳥(niǎo)，且不會(huì)飛，且會(huì)游泳，且是黑色的 則 ：該動(dòng)物是企鵝 規(guī)則 15： 如果：動(dòng)物是鳥(niǎo)，且善飛 則 ：該動(dòng)物是信天翁 動(dòng)物分類專家系統(tǒng)由 15條規(guī)則組成，可以識(shí)別七種動(dòng)物， 在15條規(guī)則中， 共出現(xiàn) 30 個(gè)概念（也稱作事實(shí)），共 30 個(gè)事實(shí)，每個(gè)事實(shí)給一個(gè)編號(hào)，從編 號(hào)從 1到 30，在規(guī)則對(duì)象中我們不存儲(chǔ)事實(shí)概念，只有該事實(shí)的編號(hào)，同樣規(guī) 則的結(jié)論也是事實(shí)概念的編號(hào)，事實(shí)與規(guī)則的數(shù)據(jù)以常量表示，其結(jié)構(gòu)如下： Char *str=chew_cud,hoo

4、ves,mammal,forward_eyes,claws, pointed_teeth,eat_meat,lay_eggs,fly,feathers,ungulate, carnivore,bird,give_milk,has_hair,fly_well, black int rulep6=22,23,12,3,0,0,21,23,12,3,0,0,22,19,20,11,0,0, 21,11,0,0,0,0,17,19,20,13,-9,0,17,18,13,-9,0,0,16,13,0,0,0,0, 15,0,0,0,0,0,14,0,0,0,0,0,10,0,0,0,0,0,8,7,0

5、,0,0,0, 7,0,0,0,0,0,4,5,6,0,0,0,2,3,0,0,0,0,1,3,0,0,0,0; int rulec=30,29,28,27,26,25,24,3,3,13,13,12,12,11,11,0; class fact private: int Number; char Name21; int Active; int Succ; public: fact *Next; fact(int Num,char *L) /-1 是已經(jīng)推理，不符合。 /0 是無(wú)， -1 是不知道， 1 是已經(jīng)推理，符合。 1 是有。 strcpy(Name,L); Number=Num; A

6、ctive=False; Succ=DontKnow; Next=NULL; char *GetName() char *L; L=new char21; strcpy(L,Name); return L; int GetNumber() return Number; int GetAct() return Active; int GetSucc() return Succ; void PutAct(const int Act0,int Suc0) Active=Act0; Succ=Suc0; ; fact *Fact; class list private: int Number; pub

7、lic: list *Next; list(int Num) Number=Num; Next=NULL; int GetNumber() return Number; ; class rule char *Name; list *Pre; int Conc; public: rule *Next; rule(char *N,int P,int C); rule(); int Query(); void GetName() coutNext; delete Pre; Pre=L; delete Name; rule:rule(char *N,int P,int C) int i; list *

8、L; Pre=NULL; Next=NULL; Name=new charstrlen(N)+1; strcpy(Name,N); i=0; while(Pi!=0) L=new list(Pi+); L-Next=Pre; Pre=L; Conc=C; int rule:Query() char c; int Tag=0; list *L; fact *F; F=Fact; L=Pre; if(L=NULL) coutGetNumber()=F-GetNumber() break; F=F-Next; if(L-GetNumber()0) if(F-GetSucc()=True) L=L-N

9、ext; continue; if(F-GetSucc()=False) return False; else if(F-GetSucc()=True) return False; if(F-GetSucc()=False) L=L-Next; continue; coutGetName()(Y/N)GetNumber()0) F-PutAct(1,True); if(L-GetNumber()PutAct(1,True); Tag=-1; return False; else if(L-GetNumber()PutAct(-1,False); else F-PutAct(-1,False);

10、 Tag=-1;/已經(jīng)推理，不符合。 return False; L=L-Next; F=Fact; for(;) if(Conc=F-GetNumber() break; F=F-Next; if(ConcPutAct(1,True); return False; if(Tag!=-1) F=Fact; for(;) if(Conc=F-GetNumber() break; F=F-Next; if(ConcPutAct(1,True); return False; coutnThis aniamal is GetName()Next=Fact; Fact=F; i+; F=Fact; Fact=NULL; while(F)/ 把倒序排列正過(guò)來(lái)。 T=F; F=F-Next; T-Next=Fact; Fact=T; i=0; ch0=R; ch1=U; ch2=L; ch3=E; ch4=_; ch5=a; ch6=0; Rule=NULL; for(i=0;iNext=Rule; Rule=R; c