Advertisement
Guest User

Untitled

a guest
Dec 22nd, 2014
156
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.31 KB | None | 0 0
  1. (define (big-sum x y z)
  2. (cond ((and (> x y) (> y z)) (sum-squares x y))
  3. ((and (> x y) (> y z)) (sum-squares x z))
  4. ((and (> y x) (> x z)) (sum-squares y x))
  5. ((and (> y z) (> z x)) (sum-squares y z))
  6. ((and (> z x) (> x y)) (sum-squares z x))
  7. ((and (> z y) (> y x)) (sum-squares z y))))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement