मैं योजना में वर्गबद्ध समीकरण की जड़ें खोजने के लिए एक प्रोग्राम लिखना चाहता हूं। मैंने कुछ बाइंडिंग के लिए एलईटी का इस्तेमाल किया।योजना में जाने का उपयोग
(define roots-with-let
(λ (a b c)
(let ((4ac (* 4 a c))
(2a (* 2 a))
(discriminant (sqrt (- (* b b) (4ac)))))
(cons (/ (+ (- b) discriminant) 2a)
(/ (- (- b) discriminant) 2a)))))
मैं 4ac
साथ विभेदक परिभाषित के बाद से मैं (* 4 a c)
नहीं चाहता था।
expand: unbound identifier in module in:
4ac
.
मेरा प्रश्न कैसे करते है का मूल्यांकन (क्या आदेश) है: भले ही मैं (4ac (* 4 a c))
परिभाषित किया है, यह मेरे इस त्रुटि दे रहा है? और अगर मुझे 4ac
मेरे let
में चाहिए तो क्या मुझे एक और आंतरिक let
लिखना चाहिए? क्या ऐसा करने के लिए इससे अच्छा तरीका है?
यह एसआईसीपी व्याख्यान/पुस्तक से एक उदाहरण है! – Nishant