【正文】 第一篇：人工智能實驗報告大全人工智能課內(nèi)實驗報告（8次）學(xué) 院： 自動化學(xué)院班 級： 智能1501 姓 名： 劉少鵬（34）學(xué) 號： 06153034目 錄課內(nèi)實驗1：猴子摘香蕉問題的VC編程實現(xiàn)????????1 課內(nèi)實驗2：編程實現(xiàn)簡單動物識別系統(tǒng)的知識表示???5 課內(nèi)實驗3：盲目搜索求解8數(shù)碼問題?????????18 課內(nèi)實驗4：回溯算法求解四皇后問題?????????33 課內(nèi)實驗5：編程實現(xiàn)一字棋游戲???????????37 課內(nèi)實驗6：字句集消解實驗?????????????46 課內(nèi)實驗7：簡單動物識別系統(tǒng)的產(chǎn)生式推理??????66 課內(nèi)實驗8：編程實現(xiàn)DS證據(jù)推理算法????????78人工智能課內(nèi)實驗報告實驗1：猴子摘香蕉問題的VC編程實現(xiàn)學(xué) 院： 自動化學(xué)院 班 級： 智能1501 姓 名： 劉少鵬（33）學(xué) 號： 06153034 日 期： 201738 10:1512:00實驗1：猴子摘香蕉問題的VC編程實現(xiàn)一、實驗?zāi)康模?）熟悉謂詞邏輯表示法；（2）掌握人工智能謂詞邏輯中的經(jīng)典例子——猴子摘香蕉問題的編程實現(xiàn)。二、編程環(huán)境 VC語言三、問題描述房子里有一只猴子（即機器人），位于a處。在c處上方的天花板上有一串香蕉，猴子想吃，但摘不到。房間的b處還有一個箱子，如果猴子站到箱子上，就可以摸著天花板。如圖1所示，對于上述問題，可以通過謂詞邏輯表示法來描述知識。要求通過VC語言編程實現(xiàn)猴子摘香蕉問題的求解過程。圖1 猴子摘香蕉問題四、源代碼include unsigned int i。void Monkey_Go_Box(unsigned char x, unsigned char y){printf(“Step %d:monkey從%c走到%”, ++i, x, y)。//x表示猴子的位置，y為箱子的} void Monkey_Move_Box(char x, char y){ 位置printf(“Step %d:monkey把箱子從%c運到%”, ++i, x, y)。//x表示箱子的位置，y為} void Monkey_On_Box(){ 香蕉的位置printf(“Step %d:monkey爬上箱子n”, ++i)。} void Monkey_Get_Banana(){ printf(“Step %d:monkey摘到香蕉n”, ++i)。} void main(){unsigned char Monkey, Box, Banana。printf(“********智能1501班**********n”)。printf(“********06153034************n”)。printf(“********劉少鵬**************n”)。printf(“請用a b c來表示猴子箱子香蕉的位置n”)。printf(“Monkeytboxtbananan”)。scanf(“%c”, amp。Monkey)。getchar()。printf(“t”)。scanf(“%c”, amp。Box)。getchar()。printf(“tt”)。scanf(“%c”, amp。Banana)。getchar()。printf(“n操作步驟如下n”)。if(Monkey!= Box){ Monkey_Go_Box(Monkey, Box)。} if(Box!= Banana){ Monkey_Move_Box(Box, Banana)。} Monkey_On_Box()。Monkey_Get_Banana()。printf(“n”)。getchar()。}五、實驗結(jié)果相關(guān)截圖六、心得體會通過本次實驗，我初步了學(xué)會了使用VC的新建工程，并且進行簡單的程序編寫。此外我還學(xué)會如何使用一些謂詞來解決生活中的一些簡單問題，并且用VC編程給出具體的操作步驟,感覺對VC編程有了新的認識。在實驗中我也遇到過許多問題，比如在我寫完代碼進行編譯時總是會出現(xiàn)一個錯誤“ fatal error C1010: 在查找預(yù)編譯頭時遇到意外的文件結(jié)尾，是否忘記了向源中添加“include ‘’”關(guān)于這個錯誤我我問了幾個同學(xué)得不出答案后，我決定通過上網(wǎng)查找，最終找到了解決方法，需要在該項目的每一個cpp結(jié)尾的文件屬性中設(shè)置不使用預(yù)編譯頭即可。在這個過程中也鍛煉了自己解決問題的能力。人工智能課內(nèi)實驗報告實驗2：編程實現(xiàn)簡單動物識別系統(tǒng)的知識表示學(xué) 院： 自動化學(xué)院班 級： 智能1501 姓 名： 劉少鵬（33）學(xué) 號： 06153034 日 期： 2017313 10:1512:00實驗2：編程實現(xiàn)簡單動物識別系統(tǒng)的知識表示一、實驗?zāi)康睦斫夂驼莆债a(chǎn)生式知識表示方法；能夠通過VC編程語言實現(xiàn)產(chǎn)生式系統(tǒng)的規(guī)則庫。二、實驗內(nèi)容以動物識別系統(tǒng)的產(chǎn)生式規(guī)則為例；用選定的編程語言建造規(guī)則庫和綜合數(shù)據(jù)庫，并能對它們進行增加、刪除和修改操作。三、實驗步驟確定需要識別的動物及其屬性本次實驗的簡單動物識別系統(tǒng)總共能識別7種動物，即：老虎、金錢豹、斑馬、長頸鹿、企鵝、鴕鳥和信天翁。建立識別七種動物識別系統(tǒng)的規(guī)則選定編程語言并確定綜合數(shù)據(jù)庫和規(guī)則庫結(jié)構(gòu)（1）選用C語言作為編程語言（2）綜合數(shù)據(jù)庫的建立（3）規(guī)則庫的建立四、程序源代碼include include using namespace std。struct RULES{int count。char pre[255]。char back[255]。int mark。}。void check()。RULES r[100] = {{ 1,“有毛發(fā)”,“哺乳動物”,0 }, { 1,“有奶”,“哺乳動物”,0 }, { 1,“有羽毛”,“鳥”,0 }, { 2,“會飛amp。下蛋amp?！?“鳥”,0 }, { 1,“吃肉”,“食肉動物”,0 }，//所有規(guī)則靜態(tài)數(shù)據(jù)庫{ 3,“有鋒利的牙齒amp。有爪amp。眼睛盯著前方amp?！?“食肉動物”,0 }, { 2,“哺乳動物amp。有蹄amp?！?“有蹄類哺乳動物”,0 }, { 2,“哺乳動物amp。反芻amp?！?“有偶蹄類哺乳動物”,0 }, { 4,“哺乳動物amp。食肉動物amp。黃褐色amp。有暗斑amp?！?“金錢豹”,0 }, { 4,“哺乳動物amp。食肉動物amp。黃褐色amp。黑色條紋amp。”,“老虎”,0 }, { 4,“有蹄類哺乳動物amp。有長脖子amp。有長腿amp。有暗斑amp。”,“長頸鹿”,0 }, { 2,“有蹄類哺乳動物amp。黑條紋amp。”,“斑馬”,0 }, { 5,“鳥amp。不會飛amp。有長脖子amp。有長腿amp。黑白色amp。”,“鴕鳥”,0 }, { 4,“鳥amp。不會飛amp。會游泳amp。黑白色amp。”,“企鵝”,0 }, { 2,“鳥amp。會飛amp。”,“信天翁”,0 }, { 1,“反芻”,“哺乳動物”,0 }}。int number。int m。int cat = 15。int a。int length。void input(){//輸入的事實長度string f[255]。//輸入的事實數(shù)組while(1){cat++。cout r[cat].count。cout r[cat].pre。cout r[cat].back。r[cat].mark = 0。while(1){cout p。if(p == 1){ } else { if(p == 2){ input()。} } check()。else { } cout cout bar。for(int t = 0。t = 0 amp。amp。 temp[i]39。039。 = 0 amp。amp。 temp[j]39。039。target[j] = temp[j]3)。break。case 2: /* down */if(blankif(blank!= 0 amp。amp。 blank!= 3 amp。amp。 blank!= 6)swap(m + blank, m + blank1][y1][y1] =1。bool flag = true。int i = 0。for(i = 0。ifor(int j = 0。jif([i][j] == 0)tmpQP[i][j] = 1。else tmpQP[i][j] = [i][j]。for(i = 0。icount +=(tmpQP[i][0] + tmpQP[i][1] + tmpQP[i][2])/ 3。count +=(tmpQP[0][i] + tmpQP[1][i] + tmpQP[2][i])/ 3。for(i = 0。ifor(int j = 0。jif([i][j] == 0)tmpQP[i][j] =1。else tmpQP[i][j] = [i][j]。for(i = 0。icount +=(tmpQP[i][0] + tmpQP[i][1] + tmpQP[i][2])/ 3。count +=(tmpQP[0][i] + tmpQP[1][i] + tmpQP[2][i])/ 3。for(i = 0。icount +=(tmpQP[0][0] + tmpQP[1][1] + tmpQP[2][2])/ 3。count +=(tmpQP[2][0] + tmpQP[1][1] + tmpQP[0][2])/ 3。return count。return false。L1: cout }。} else {} cout demo(){} bool Judge(){} virtual bool AutoDone(){int a, b, i, j, m, n, max, min, x, y。if(IsWin(States[0])==1){} a = 0, b = 0。max =10000。for(x = 0。xfor(y = 0。yif(States[0].QP[i][j] == 0){a = 1。for(x = 0。xfor(y = 0。y}}States[a].QP[x][y] = States[0].QP[x][y]。States[a].QP[i][j] = 1。min = 10000。for(m = 0。mfor(n = 0。n}if(States[a].QP[m][n] == 0){}b = 1。for(x = 0。xfor(y = 0。yStates[10].QP[x][y] = States[a].QP[x][y]。States[10].QP[m][n] =1。States[10].e_fun = e_fun(States[10])。if(States[10].e_funStates[a].e_fun = min。if(States[a].e_funmax){}max = States[a].e_fun。for(x = 0。xfor(y = 0。yStates[11].QP[x][y] = States[a].QP[x][y]。for(x = 0。x} else if(IsWin(States[0])==1){} return false。cout }。} void main(){cout system(“title 子棋智能小游戲”)。system(“color A2”)。char IsFirst。bool IsFinish。cout IsFirst。demo *p = new demo()。pinit()。cout PrintQP()。do {if(!pJudge()){} if(pJudge())IsFinish = true。if(IsFirst == 39。Y39。){} else if(IsFirst == 39。N39。){} IsFinish = pAutoDone()。if(!pJudge()){ }if(!IsFinish){ pUserInput()。pPrintQP()。} pUserInput()。pPrintQP()。if(!pJudge()){ }IsFinish = pAutoDone()。} while(!IsFinish)。if((pIsWin(pStates[0])== 0)amp。amp。 pJudge()){} } cout 實驗心得本次實驗，我通過學(xué)習(xí)用VC編程語言設(shè)計簡單的博弈游戲，從而理解和掌握博弈樹的啟發(fā)式搜索過程，熟悉博弈中兩種最基本的搜索方法——極大極小過程和ab過程。并且將這種思想通過代碼表現(xiàn)出來。本次實驗我最大的收獲不僅僅是學(xué)到了課本上的知識，更是學(xué)會了如何主動的求解問題的答案。實驗中我遇到了許多困難，不僅僅是有關(guān)編程算法方面的，還有一些代碼邏輯流程的設(shè)計。這些困難我通過上網(wǎng)和去圖書館查找資料或者向同學(xué)請教等方式，逐一解決了困難，我收獲良多。人工智能課內(nèi)實驗報告實驗6：子句集消解實驗學(xué) 院： 自動化學(xué)院 班 級： 智能1501 姓 名： 劉少鵬（33）學(xué) 號： 06153034 日 期： 2017058 10:1512:00實驗6子句集消解實驗一、實驗?zāi)康模?）熟悉子句集化簡的九個步驟；（2）理解消解規(guī)則，能把任意謂詞公式轉(zhuǎn)換成子句集。二、編程環(huán)境Visual Studio 2017三、實驗原理在謂詞邏輯中，任何一個謂詞公式都可以通過應(yīng)用等價關(guān)系及推理規(guī)則化成相應(yīng)的子句集。其化簡步驟如下：(1)消去連接詞“→”和“?” 反復(fù)使用如下等價公式：P→Q ?﹁ P∨QP?Q ?(P∧Q)∨(﹁P∧﹁Q)即可消去謂詞公式中的連接詞“→”和“?”。(2)減少否定符號的轄域 反復(fù)使用雙重否定率﹁(﹁P)? P摩根定律﹁(P∧Q)?﹁P∨﹁Q﹁(P∨Q)?﹁P∧