練習(xí)2.67

我們先來把該導(dǎo)入的導(dǎo)入，然后就來測試了。

(load "d:\\lisp\\tree.scm") (define sample-tree(make-code-tree (make-leaf 'A 4)(make-code-tree (make-leaf 'B 2)(make-code-tree (make-leaf 'D 1)(make-leaf 'C 1))))) (define sample-message '(0 1 1 0 0 1 0 1 0 1 1 1 0)) (decode sample-message sample-tree) ;Value 11: (a d a b b c a)

---

---

大家按照書上的解碼過程，可以人工解碼進行驗證的。

---

---

感謝訪問，希望對您有所幫助。 歡迎關(guān)注或收藏、評論或點贊。

---

為使本文得到斧正和提問，轉(zhuǎn)載請注明出處：
http://blog.csdn.net/nomasp

---

版權(quán)聲明：本文為 NoMasp柯于旺 原創(chuàng)文章，如需轉(zhuǎn)載請聯(lián)系本人。

轉(zhuǎn)載于:https://www.cnblogs.com/NoMasp/p/4786125.html

總結(jié)

以上是生活随笔為你收集整理的【SICP练习】94 练习2.67的全部內(nèi)容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網(wǎng)站內(nèi)容還不錯，歡迎將生活随笔推薦給好友。