I’ve just started experimenting with Scheme, specifically to follow Structure and Interpretation of Computer Programs. Here is a Scheme procedure that returns the sum of squares of two larger numbers out of the given three.
(define (sumLargeSquare a b c) (cond ((and (< a b) (< a c)) (+ (* b b) (* c c))) ((and (< b a) (< b c)) (+ (* a a) (* c c))) (else (+ (* a a) (* b b)))))