0
目前通過SICP去之前不能使用,並且靠近第一章結束時,他們問你能編寫圓周率的值,與 pi/4 = (2 * 4 * 4 * 6 * 6 * 8 * ...)/(3 * 3 * 5 * 5 * 7 * 7 *..)
方案/球拍 - 未定義的功能;初始化
我有以下功能定義:
;Term and Next are both functions, a and b are the range of the product
(define (product term a next b)
(if (> a b) 1
(* (term a) (product term (next a) next b))))
和
(define (pi-approx n)
(define (square x) (* x x))
(define (num-prod ind) (* (* 2 ind) (* 2 (+ ind 1)))) ; calculates the product in the numerator for a certain term
(define (denom-prod ind) (square (+ (* ind 2) 1))) ;Denominator product at index ind
(define num (product num-prod 1 inc n))
(define denom (product denom-prod 1 inc n))
(* 4 (/ num denom))) ;;Resulting value
當我運行在DrRacket這個代碼,我得到以下錯誤: num-prod: Undefined; Cannot use before initialization
,即使我在在我使用它之前,itialize num-prod幾行。
我在做什麼語法錯誤?
一旦我添加了'(define inc add1)',我就很好地工作了。你正在使用REPL還是定義區域? –
我不確定兩者之間有什麼區別,但我使用編輯器的頂部......下面是它的樣子:[link](https://imgur.com/a/m2R0A )。注意,我確實有'(define(inc x)(+ x 1))'代碼,所以我相當確定這不是問題的一部分。 –
小突破!我問了一些問題,並解決了這個問題是使用'#lang racket'而不是'#lang sicp' ......我不太確定爲什麼這會改變任何事情,但任何見解都會受到歡迎! –