【文章內(nèi)容簡(jiǎn)介】 0。之間的數(shù)字!”ti=rule[i].relation[j]。while(ti!=1)//1作為結(jié)束{if(flag[ti]==0)break。j++。ti=rule[i].relation[j]。}if(ti==1)//ti==1代表規(guī)則滿足{tres=rule[i].name。flag[tres]=1。printf(“運(yùn)用了規(guī)則%d : ”,i)。j=0。while(rule[i].relation[j]!=1){coutj++。}cout ”if(IsAnimal(tres)){return 1。}}}if(i==15){cout}return1。} void main(){char q。while(q!=39。n39。){menu()。input()。inference()。coutcinq。system(“cls”)。} }四、結(jié)果分析若已知：動(dòng)物是蹄類(23)，且有黑色條紋(13)，則結(jié)果：該動(dòng)物對(duì)應(yīng)事實(shí)數(shù)組的第27個(gè)“斑馬”。使用了推理規(guī)則12，即：{{23,13,1},27}，使用規(guī)則運(yùn)行結(jié)果如圖1所示：圖1若已知：動(dòng)物是鳥類（21），且是肉食類（19），則結(jié)果該動(dòng)物對(duì)應(yīng)事實(shí)數(shù)組的第25個(gè)“海燕”。使用了推理規(guī)則14，即：{{21,19,1},25}，使用規(guī)則運(yùn)行結(jié)果如圖2所示：圖2五、心得體會(huì)本實(shí)驗(yàn)環(huán)境主要提供一個(gè)能夠?qū)崿F(xiàn)模擬產(chǎn)生式專家系統(tǒng)的驗(yàn)證、設(shè)計(jì)和開發(fā)的可視化操作平臺(tái)。使用戶既能用本系統(tǒng)提供的范例進(jìn)行演示或驗(yàn)證性實(shí)驗(yàn)，也能夠用它來(lái)設(shè)計(jì)并調(diào)試自己的實(shí)驗(yàn)?zāi)Ｐ?。通過這次實(shí)驗(yàn)，我對(duì)產(chǎn)生式系統(tǒng)有了更深刻的認(rèn)識(shí)。產(chǎn)生式系統(tǒng)是由一組規(guī)則組成的、能夠協(xié)同作用的推理系統(tǒng)。、綜合數(shù)據(jù)庫(kù)和推理機(jī)三大部分組成。產(chǎn)生式系統(tǒng)用來(lái)描述若干個(gè)不同的以一個(gè)基本概念為基礎(chǔ)的系統(tǒng)，這個(gè)基本概念就是產(chǎn)生式規(guī)則或產(chǎn)生式條件和操作對(duì)。在產(chǎn)生式系統(tǒng)中，論域的知識(shí)分為兩部分：用事實(shí)表示靜態(tài)知識(shí)；用產(chǎn)生式規(guī)則表示推理過程和行為。專家系統(tǒng)的規(guī)則是由專家定的，在該實(shí)驗(yàn)中，是由本人制定的。教師評(píng)語(yǔ)：教師簽名：第三篇：人工智能實(shí)驗(yàn)一人工智能技術(shù)基礎(chǔ)PROLOG語(yǔ)言編程練習(xí)實(shí)驗(yàn)報(bào)告一、實(shí)驗(yàn)?zāi)康模杭訌?qiáng)對(duì)邏輯程序運(yùn)行機(jī)能的理解，更好地掌握PROLOG語(yǔ)言的特點(diǎn)、熟悉其編程環(huán)境，同時(shí)為后面的人工智能程序設(shè)計(jì)做好準(zhǔn)備。二、實(shí)驗(yàn)要求：（1）程序自選，但必須是描述某種邏輯關(guān)系的小程序。（2）跟蹤程序的運(yùn)行過程，理解邏輯程序的特點(diǎn)。（3）對(duì)原程序可作適當(dāng)修改，以便熟悉程序的編輯、編譯和調(diào)試過程。三、實(shí)驗(yàn)內(nèi)容：在Turbo PROLOG或Visual Prolog集成環(huán)境下調(diào)試運(yùn)行簡(jiǎn)單的PROLOG程序，如描述親屬關(guān)系的PROLOG程序或其他小型演繹數(shù)據(jù)庫(kù)程序等。四、實(shí)驗(yàn)結(jié)果：（1）驗(yàn)證題1源程序 domains d=integer predicates not_(D,D)and_(D,D,D)or_(D,D,D)xor(D,D,D)clauses not_(1,0).not_(0,1).and_(0,0,0).and_(0,1,0).and_(1,0,0).and_(1,1,1).or_(0,0,0).or_(0,1,1).or_(1,0,1).or_(1,1,1).xor(Input1,Input2,Output):not_(Input1,N1),/*（1，0）*/not_(Input2,N2),/*（0，1）*/and_(Input1,N2,N3)，and_(Input2,N1,N4)，or_(N3,N4,Output).（2）驗(yàn)證題2源程序 predicates student(integer,string,real)grade goal student(1,“zhang”,).student(2,“l(fā)i”,).student(3,“wang”,).grade:write(“Please input name:”),readln(Name)，student(_,Name,Score)，nl,write(Name,“grade is”,Score).grade:write(“Sorry,the student cannot find!”).（3）驗(yàn)證題3源程序 domains n,f=integer predicates factorial(n,f)goal readint(I), factorial(I,F), write(I,“!=”,F).clauses factorial(1,1).factorial(N,Res):N0，N1=N1，factorial(N1,FacN1)，Res=N*FacN1.（4）驗(yàn)證題4源程序 domains s=symbol predicates p(s)p1(s)p2(s)p3(s)p4(s)p5(s,s)p11(s)p12(s)p31(s)goal p(X),write(“the x is ”,X).clauses p(a1):p1(b),p2(c).p(a2):p1(b),p3(d),p4(e).p(a3):p1(b),p5(f,g).p1(b):p11(b1),p12(b2).p3(d):p31(d1).p2(c1).p4(e1).p5(f,g).p11(b1).p12(b2).p31(d11).（5）驗(yàn)證題5源程序 domains name=symbol age =integer predicates player(name,age)match(name,name)clauses player(peter, 9).player(paul, 10).player(chris, 9).player(susan, 9).match(X,Y):player(X,9), player(Y,9), (X,Y):!, player(X,9), player(Y,9), (X,Y):player(X,9),!, player(Y,9), (X,Y):player(X,9), player(Y,9),!, (X,Y):player(X,9), player(Y,9), XY,!.在外部Goal: match(X,Y)條件下，“分別”采用以上各match謂詞，觀察對(duì)應(yīng)的執(zhí)行結(jié)果如下：（a）（b）(c)(d)(e)五、實(shí)驗(yàn)總結(jié)(1)實(shí)驗(yàn)中出現(xiàn)的問題a、做完驗(yàn)證題一，加載不成功。b、由于驗(yàn)證題五需要在外部Goal: match(X,Y)條件下，“分別”采用以上各match謂詞，觀察對(duì)應(yīng)的執(zhí)行結(jié)果。我采用建立一個(gè)源程序文本，load加載進(jìn)去，修改刪除五次match謂詞結(jié)構(gòu)，結(jié)果第一次編輯運(yùn)行完，第二次load加載，還是第一次修改后的結(jié)果。(2)對(duì)問題的解決方法 a、驗(yàn)證題一運(yùn)行驗(yàn)證完后，加以保存，再進(jìn)行l(wèi)oad加載下一驗(yàn)證實(shí)驗(yàn)。b、由于在進(jìn)行第二個(gè)match謂詞驗(yàn)證之前，對(duì)第一個(gè)match謂詞運(yùn)行的結(jié)果進(jìn)行了保存，所以第二次load加載是第一個(gè)保存后的結(jié)果。分別load加載后，實(shí)驗(yàn)運(yùn)行成功。(3)心得體會(huì)本次實(shí)驗(yàn)，課上基本都有提到，課上的理論推理知識(shí)較易掌握，實(shí)驗(yàn)是對(duì)課上理論知識(shí)的實(shí)踐，進(jìn)一步的夯實(shí)。在實(shí)驗(yàn)前，認(rèn)真閱讀了實(shí)驗(yàn)指導(dǎo)，加以課上老師的指點(diǎn)，實(shí)驗(yàn)完成的十分順利。通過本次上機(jī)實(shí)驗(yàn)，使自己對(duì)PROLOG語(yǔ)言集成環(huán)境下調(diào)試運(yùn)行，有了一定的掌握，目前所接觸到的語(yǔ)言的調(diào)試運(yùn)行都大同小異。掌握一門新語(yǔ)言，除了掌握理論知識(shí)外，上機(jī)實(shí)驗(yàn)，多動(dòng)腦分析代碼，多動(dòng)手調(diào)試運(yùn)行代碼十分重要。對(duì)于工科類學(xué)生深知實(shí)踐對(duì)工作學(xué)習(xí)的重要性。第四篇：漢諾塔實(shí)驗(yàn)(人工智能)實(shí)驗(yàn)二——專家系統(tǒng)一、源代碼import 。import 。import 。public class Index extends {jmilk = new ()。jclaw = new ()。jhoof = new ()。jbird = new ()。jloogLeg = new ()。jflyable = new ()。jeatMeat = new ()。jfur = new ()。jruminate = new ()。jswim = new ()。jfeather = new ()。jdogTooth = new ()。jflyest = new ()。jlayEgg = new ()。jblackWhite = new ()。jyellow = new ()。jinFlyable = new ()。jdarkDot = new ()。jhoofAnimal = new ()。jpredator = new ()。jmammal = new ()。jblackStrip = new ()。jgaze = new ()。jLabel1 = new ()。btnOk = new ()。jloogNeck = new ()。private void initComponents(){ public Index(){ } initComponents()。數(shù)組設(shè)置//：checkBoxs[0] = jmilk。checkBoxs[1] = jclaw。checkBoxs[2] = jhoof。checkBoxs[3] = jbird。checkBoxs[4] = jloogLeg。checkBoxs[5] = jflyable。checkBoxs[6] = jeatMeat。checkBoxs[7] = jfur。checkBoxs[8] = jruminate。checkBoxs[9] = jswim。checkBoxs[10] = jfeather。checkBoxs[11] = jdogTooth。checkBoxs[12] = jflyest。checkBoxs[13] = jlayEgg。checkBoxs[14] = jblackWhite。checkBoxs[15] = jyellow。checkBoxs[16] = jinFlyable。checkBoxs[17] = jdarkDot。checkBoxs[18] = jhoofAnimal。checkBoxs[19] = jpredator。checkBoxs[20] = jmammal。checkBoxs[21] = jblackStrip。checkBoxs[22] = jgaze。checkBoxs[23] = jloogNeck。：//數(shù)組設(shè)置setDefaultCloseOperation()。(“u5976”)。(“u722a”)。(“u8e44”)。(“u9e1f”)。(“u957fu817f”)。(“u4f1au98de”)。(“u5403u8089”)。{(“u6bdbu53d1”)。(“u53cdu520d”