Open zzz6519003 opened 5 years ago
リストの各要素を二乗し、それを足し合わせた後、平方根をとる関数を fold を使って書いてください。
(define (sqrt-sum-sq ls) (sqrt (foldr + 0 (map (lambda (x) (* x x)) ls))))
リストの各要素を二乗し、それを足し合わせた後、平方根をとる関数を fold を使って書いてください。