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

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

テストしましたが、sum-of-squares機能が動作しません。なんで?

4

1 に答える 1

9

(display x)void と評価されます (何もないと見なされる可能性があります)。引数を出力するが返さない関数呼び出しです。代わりに、表示せずに値を評価するように square 関数を定義する必要があります。つまり、次のようになります。

(define (square x)
  (* x x))
于 2008-10-30T07:43:17.003 に答える