gosh> (define (log10 n) (/ (log n) (log 10))) log10 gosh> (log10 10) 1.0 gosh> (log10 100) 2.0 gosh> (log10 1000) 2.9999999999999996 むむ？ gosh> (define (power x n) (if (= n 1) x (* x (power x (- n 1))) ) ) power gosh> (power 2 2) 4 gosh>…