[SOLVED] CS代考程序代写 (define (square x)(* x x))

(define (square x)(* x x))

(define a (* 5 5))
(define (b) (* 5 5))

(define (sum-of-squares x y)
(+ (square x)
(square y)))

(define (f a) (sum-of-squares (+ a 1) (* a 2)))

(define (pretty-sum a b)
(display a)(display ” + “)(display b)
(newline)(display ” = “)
(+ a b))

(define (myfunc a)
(+ a 1)
(* a 2)
(- a a)
a)

(myfunc 17)