为什么这个Scheme平方和函数不起作用？

Question

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

(define (sum-of-squares a b) 
  (+ (square a) (square b))) 

我测试了它,sum-of-squares功能不起作用.为什么？

Answer 1

(display x)评估为无效(可能被视为无效).它是一个函数调用,它打印出参数但不返回它.相反,你应该定义square函数来评估值而不显示,即:

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