Computer Science                                                                            Name -
LISP worksheet #2

Do the following exercises. Evaluate the final expression. Be sure to enclose answers that are lists in parentheses and to write answers that are individual atoms without parentheses.

1.
(SETQ x '(alpha beta zeta))
(CAR x)

2.
(SETQ autos '(chevy ford dodge))
(CDR autos)

3.
(SETQ m (ADD 1 3))
(CAR m)

4.
(SETQ m '(ADD 1 3))
(CAR m)

5.
(SETQ students '(art bob chris dana))
(CAR (CDR students))

6.
(SETQ elements '(H He Li B Au))
(CDR (CAR elements))

7.
(SETQ presidents '(Abe George John Ronald))
(REVERSE (CDR presidents))

8.
(SETQ careful '((a b) c d))
(CAR careful)

9.
(SETQ reallycareful '((m n) p (q r)))
(CDR (REVERSE reallycareful))

10.
(DEF addTwo(x) (ADD x 2))
(addTwo 13)

11.
(DEF tax(x) (MULT x 0.06))
(DEF rebate(x) (SUB x 3))
(rebate (tax 10))