Skip to content

Instantly share code, notes, and snippets.

@jimweirich
Forked from redsquirrel/gist:189190
Created September 18, 2009 19:20
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save jimweirich/189233 to your computer and use it in GitHub Desktop.
Save jimweirich/189233 to your computer and use it in GitHub Desktop.
;; Exercise 1.1. Below is a sequence of expressions. What is the
;; result printed by the interpreter in response to each expression?
;; Assume that the sequence is to be evaluated in the order in which
;; it is presented.
;; 10
;; => 10
;; (+ 5 3 4)
;; => 12
;; (- 9 1)
;; => 8
;; (/ 6 2)
;; => 3
;; (+ (* 2 4) (- 4 6))
;; => 6
;; (define a 3)
;; (define b (+ a 1))
;; (+ a b (* a b))
;; => 19
;; (= a b)
;; => #f
;; (if (and (> b a) (< b (* a b)))
;; b
;; a)
;; => 4
;; (cond ((= a 4) 6)
;; ((= b 4) (+ 6 7 a))
;; (else 25))
;; => 16
;; (+ 2 (if (> b a) b a))
;; => 6
;; (* (cond ((> a b) a)
;; ((< a b) b)
;; (else -1))
;; (+ a 1))
;; => 16
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment