最近2018中文字幕在日韩欧美国产成人片_国产日韩精品一区二区在线_在线观看成年美女黄网色视频_国产精品一区三区五区_国产精彩刺激乱对白_看黄色黄大色黄片免费_人人超碰自拍cao_国产高清av在线_亚洲精品电影av_日韩美女尤物视频网站

最近在看 MIT 公開課-計(jì)算機(jī)程序的構(gòu)造和解釋，即使你像我一樣根本沒學(xué)過 lisp 也能看懂下面這段代碼，這段代碼展示了怎么實(shí)現(xiàn)加法運(yùn)算，這種我們幾乎從來不會去想為什么的問題，這幾行簡單的代碼告訴我們?nèi)绾斡?jì)算出 3 + 4 的值

由 皮亞諾 算術(shù)定義的求 x 和 y 之和的過程

 
 

  
  
; Define a [+] processor 
  
  
(define (+ x y) 
  
  
    (if (= x 0) 
  
  
        y 
  
  
        (+ (-1+x) (1+y)))) 
  
  
 
  
  
; x = 3, y = 4 
  
  
(+ 3 4) 
  
  
(if (= 3 0) 4 (+ (-1+3) (1+4))) 
  
  
(+ (-1+3) (1+4)) 
  
  
(+ 2 5) 
  
  
(if (= 2 0) 5 (+ (-1+2) (1+5))) 
  
  
(+ (-1+2) (1+5)) 
  
  
(+ 1 6) 
  
  
(if (= 1 0) 6 (+ (-1+1) (1+6))) 
  
  
(+ (-1+1) (1+6)) 
  
  
(+ 0 7) 
  
  
(if (= 0 0) 7 (-1+0) (1+7)) 
  
  
7 
 
 

當(dāng)前文章：使用Lisp簡單描述加法運(yùn)算
轉(zhuǎn)載來于：http://m.fisionsoft.com.cn/article/cddjhse.html