[LISP] Binomische Formel?

[mcburn83]

Hi ich arbeite mich grad in LISP ein und versuch diese beiden Formeln:

- Langversion: a² + b² + 2ab
- Kurzversion: (a+b)²

in LISP darzustellen, aber so wirklich krich ich das nicht hin.

Weiß jemand wie man das schreiben muss?

MFG Burn

 

[claW.]

mal in scheme:

(define binom-long
  (lambda (a b)
    (+ (+ (* a a) (* (* 2 a) b) (* b b)))
  )
)

(define binom-short
  (lambda (a b)
    (* (+ a b) (+ a b))
  )
)

 

[asdfman]

Wofür das Lambda-Kalkül? Geht doch auch ganz einfach so:

(define (binom-long a b)
 (+ (+ (* a a) (* (* 2 a) b) (* b b))))

(define (binom-short a b)
 (* (+ a b) (+ a b)))