Saturday's Solutions
---------------------

Exercise 1:

(define seconds-per-minute 60.0)
(define minutes-per-hour 60.0)
(define hours-per-day 24.0)
(define days-per-year 365.25)

(define minutes->days
  (lambda (mins)
    (/ (/ mins minutes-per-hour) hours-per-day)))

(define days->minutes
  (lambda (days)
    (* days hours-per-day minutes-per-hour)))

Exercise 2:

(define wondrous?
  (lambda (n)
    (display n) (newline)
    (if (= n 1)
        #t
        (if (even? n)
            (wondrous? (/ n 2))
            (wondrous? (+ (* 3 n) 1))))))

Exercise 3:

(define Q
  (lambda (n)
    (if (< n 3)
        1
        (+ (Q (- n (Q (- n 1)))) (Q (- n (Q (- n 2))))))))