程序的流程控制和autolis-文庫(kù)吧
2025-04-22 09:43 本頁(yè)面
【正文】 b 2)， 第 3個(gè)變?cè)菞l件不成立時(shí)執(zhí)行的表達(dá)式 ， 它對(duì)應(yīng)表達(dá)式 (print (＋ b a)) ， 那么后面的兩個(gè)表達(dá)式就是多余的變?cè)?， 因此顯示 “ too many arguments（ 變?cè)?） ” 的出錯(cuò)信息。 若將該程序段改寫為以下代碼： (if ( a 1) ((setq b 2) (print (＋ b a)) ) ((setq b 4) (print b) ) ) 用括號(hào)將條件成立或不成立的多個(gè)表達(dá)式括起 ， 雖然變?cè)臄?shù)量改為 3個(gè) ， 但會(huì)出現(xiàn) “ error: bad function: 2”的出錯(cuò)信息 。 原因是在計(jì)算條件成立的表達(dá)式時(shí) ， 首先計(jì)算內(nèi)層表 (setq b 2)，將其返回值 “ 2”作為外層表的函數(shù)名 ， 顯然這是一個(gè)壞的函數(shù)名 。 利用 progn函數(shù)可以很好地解決了本程序段存在的問題 。 3. (prong 表達(dá)式 ...) 該函數(shù)將 n個(gè)表達(dá)式組合起來 ， 作為 if函數(shù)的一個(gè)表達(dá)式 。 在執(zhí)行時(shí) ， 按順序計(jì)算 n個(gè)表達(dá)式 ,返回最后一個(gè)表達(dá)式的計(jì)算結(jié)果。 例如： (if ( a 1) (progn (setq b 2) (print (＋ b a)) ) (progn (setq b 4) (print b) ) ) 該程序段的執(zhí)行過程是，若條件成立， b等于 2，然后打印 a與b之和，返回 a與 b之和；若條件不成立， b等于 4，然后打印 4，返回 4。 循環(huán)結(jié)構(gòu) 1. (repeat 整數(shù) n 表達(dá)式 … ) 重復(fù)執(zhí)行 n次 ， 對(duì)所有的表達(dá)式求值 ， 返回最后一個(gè)表達(dá)式的計(jì)算結(jié)果 。 例如： (setq a 1 b 100) (repeat 10 (setq a(1+ a)) 其它表達(dá)式 … (setq b(+ 10 b)) ) 執(zhí)行結(jié)果： a等于 11， b等于 200， 返回值為 200。 2. (while 測(cè)試式 表達(dá)式 … ) 若測(cè)試結(jié)果不為 nil， 執(zhí)行各表達(dá)式 , 直至測(cè)試結(jié)果為 nil。 例如： (setq i 1 a 10) (while (= i 10) (setq a(+ a 10)) 其它表達(dá)式 … (setq i (1+ i ) ) 執(zhí)行結(jié)果： i等于 11， a等于 110， 返回值為 11。 例如 ， 定義求解百錢買百雞的函數(shù) 。 題目是若母雞每只 3個(gè)錢， 公雞每只 2個(gè)錢 ， 小雞每只 。 用 100個(gè)錢買 100只雞 ， 有幾個(gè)答案 ， 每個(gè)答案各有幾只母雞 、 公雞和小雞 （ 不包括 0只 ）， 打印所求的結(jié)果 。 該例沒有合適的計(jì)算公式 ， 只能利用枚舉 ， 試出合適的結(jié)果。 首先分析母雞數(shù)量的范圍 ， 如果母雞等于 20， 剩余 40個(gè)錢 。 用剩下的錢至少買 1只公雞之后 ， 可以買 76只小雞 ， 但雞的總數(shù)為97（ 小于 100） ， 所以 母雞的數(shù)量應(yīng)小于 20。 同樣 ， 買了至少 1只母雞和 32只公雞之后 ，
法律信息相關(guān)推薦
鄂ICP備17016276號(hào)-1