Play audio slide show -- Keyboard shortcut: 'x'  Back to notes -- Keyboard shortcut: 'u'              Slide program -- Keyboard shortcut: 't'      The necessary Scheme stuff to evaluate the expression.Lecture 5 - slide 15 : 26
Program 1
(define (fak n)
  (if (= n 0) 1 (* n (fak (- n 1)))))

(define (fib n)
  (cond ((= n 0) 0)
        ((= n 1) 1)
        (else (+ (fib (- n 1)) (fib (- n 2))))))

((lambda(x y) (+ (* x x) (* y y)))  (fak 5)  (fib 10))