Exercise 1.3

(define (f a b c)
 (cond ((and (<= a b) (<= a c)) 
        (+ (* b b) (* c c))) 
       ((and (<= b a) (<= b c)) 
        (+ (* a a) (* c c))) 
       ((and (<= c a) (<= c b)) 
        (+ (* a a) (* b b)))))

(f 1 2 3) => 13 
(f 3 2 1) => 13