使用递归求3个数中较大的两个数的平方和

pugs

刚刚在csdn上看到的一道题目，感兴趣的不妨做做，看能否在较短间内完成。

题目：实现一个带三个参数的函数int sum_square(int a, int b, int c)。这个函数返回三个参数中最大的两个参数的平方和。

要求：使用递归算法实现

例子：sum_square(1, 2, 3) == 2 * 2 + 3 * 3 == 13

常规解法：

1. 
   
2. int square(int x, int y)
   
3. {
   
4.      return x * x + y * y;
   
5. }
   
6. 
   
7. int sum_square(int a, int b, int c)
   
8. {
   
9.      if (a < b && a < c)
   
10.            return square(b, c);
    
11.      if (b < a && b < c)
    
12.            return square(a, c);
    
13.      if (c < a && c < b)
    
14.            return square(a, b);
    
15. }
    

复制代码

retuor

emacs lisp

1. 
   
2. (defun f (x y z)
   
3.   (if (and (<= x y) (<= x z))
   
4.       (+ (* y y) (* z z))
   
5.     (f y z x)))
   

复制代码

flw

Erlang:

1. foo( X, Y, Z ) when X < Y, X < Z -> Y*Y + Z*Z;
   
2. foo( X, Y, Z ) -> foo( Y, Z, Z ).

复制代码

Haskell:

1. foo x y z | x < y, x < z = y*y + z*z
   
2. foo x y z = foo y z x

复制代码

Godbach

既然是int型，是不是要考虑负数呢？

pugs

2L、3L都挺厉害的，为啥不用C解答，难道用C掉档次
我土，给个C版本的答案吧：

1. 
   
2. int square(int x, int y)
   
3. {
   
4.      return x * x + y * y;
   
5. }
   
6. 
   
7. int sum_square(int a, int b, int c)
   
8. {
   
9.      if (a < b && a < c)
   
10.            return square(b, c);
    
11.      return sum_square(b, c, a);
    
12. }
    

复制代码

[ 本帖最后由 pugs 于 2008-12-31 21:03 编辑 ]

win_hate

我也掺和一下, scheme 的，用一个不同思路的递归

1. 
   
2. (define (f xs)
   
3.   (define (g ys y s)
   
4.     (if (null? ys) (- s (* y y))
   
5.       (let* ((now (car ys))
   
6.              (sum (+ s (* now now))))
   
7.         (if (< now y) (g (cdr ys) now sum)
   
8.             (g (cdr ys) y sum)))))
   
9.   (let ((fst (car xs)))
   
10.     (g (cdr xs) fst (* fst fst))))
    

复制代码

累加各数的平方，并减去最小数的平方。

[ 本帖最后由 win_hate 于 2008-12-31 21:12 编辑 ]

tyc611

这程序真难读

win_hate

原帖由 tyc611 于 2008-12-31 21:20 发表
这程序真难读

其实你用过 scheme 就不会觉得难读了。

这样会不会好一点？

1. 
   
2. (define (square x) (* x x))
   
3. 
   
4. (define (f xs)
   
5.   (let ((m (apply min xs))
   
6.         (s (apply + (map square xs))))
   
7.     (- s (square m))))
   

复制代码

yaksavage

照win_hate老大的算法，来个python的
>>> def foo(a, b, c):
...     return sum(map(lambda x:x*x, (a, b, c))) - min(a,b,c)**2
...
>>> foo(1, 2, 3)
13

cugb_cat

汗，这帖把各路财神都招来了