SICP Exercise 1.31

最新推荐文章于 2024-11-27 16:47:48 发布

iteye_5681

最新推荐文章于 2024-11-27 16:47:48 发布

阅读量148

点赞数

分类专栏：程序的构造与解释文章标签： C C++ C#

程序的构造与解释专栏收录该内容

8 篇文章

订阅专栏

本文介绍了使用Scheme语言定义和调用函数的方法，包括迭代式和递归式的函数实现方式。通过具体的函数定义示例，如求和和计数等，展示了如何利用Scheme语言进行逻辑处理。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

(define (sum term a next b)
  (if (> a b)
      1
      (* (term a)
         (sum term (next a) next b))
      ))

(define (sum2 a b c from to)
  (if (= from to)
      c
      (sum2 (next b ) (next a ) (count2 (next a ) (next b ) c) (+ from 1) to))
  )

(define (next a)
     (+ a 1)
  )

(define (count2 a b c)
        (* (/ a b) c)
  )

(sum2 1 2 1 0 4)

迭代式

(define (sum-131 a b )
  (sum count a inc b)
  )

(define (inc n) (+ n 1))

(define (even? n)
  (= (remainder n 2) 0)
  )

(define (count a)
    (if (even? a)
        (/ (+ a 2) (+ a 1))
        (/ (+ a 1) (+ a 2))
        ) 
  )

(sum-131 1 4)

递归式