有趣的语言例析

有种语言它专门负责数值计算，它叫Lisp语言。它简洁，优雅。易懂，以下是一些代码片断：

(- 2  1)
(*  2 4 5)
(/   6  2)
(+ (* 2 4) (- 4 6))
(define a 3)
(define b (+ a 1))
(+ a b (* a b)
(= a b)

(if (and(> b  a) (< b (* a b)))
         b
		 a)
 (cond ((= a 4) 6)
       ((= b 4) (+ 6 7 a))
	   (else 25))
	   
	  
  (define (abs x)
      (if (< x 0)
	       (-x)
		   x))
		   
   (define(abs x)
      (cond ((< x 0) (-x))
	     (else x)))
    
	(define (abs x)
	    (cond((> x 0) x)
		     ((= x 0) 0)
			 ((< x 0)(-x))))
			 
    
	(define(f a)
	   (sum-of-squares(+ a 1) (* a 2)))
	   
	(define (sum-of-squares x y)
	   (+ (square x) (square y)))
	   
	   
	   (sum-of-squares 3 4)
	   
	   (sum-of-squares (+ 5 1) (* 5 2))
		 
	   (define (square x) (* x x))
	   
	   (square (+ 2 5))
	   49
	   
	   (* (+ 2 (* 4 6)))
	   
	   (+ 3 5 7)
	

有本讲lisp语言的书，大家可以下载下来看看，中文名叫《SICP+计算机程序的构造和解释》