(define (square x) (* x x))(define (sum-with-biggest-two a b c) (cond ((and (> a b) (> c b)) (+ (square a) (square c) b)) ((and (> a c) (> b c)) (+ (square a) (square b) c)) (else (+ (square b) (square c) a))))
댓글 없음:
댓글 쓰기