如何编写这个Lisp / Scheme代码?

时间:2008-10-23 02:34:17

标签: lisp scheme

一个lambda表达式,它接受一个函数(一个参数)和一个数字,并将该函数应用于该数字的两倍。

3 个答案:

答案 0 :(得分:8)

将该功能应用于数字的两倍:

(lambda (f x) (f (* 2 x)))

将该函数应用于数字两次(这可能是您想要问的):

(lambda (f x) (f (f x)))

答案 1 :(得分:5)

格雷格的回答是正确的,但你可能会考虑如何分解这个问题来自己找到答案。这是一种方法:

; A lambda expression
;(lambda () )

; which takes a function (of one argument) and a number
;(lambda (fun num) )

; and applies the function
;(lambda (fun num) (fun num))

; to twice the number
;(lambda (fun num) (fun (* 2 num)))

((lambda (fun num) (fun (* 2 num))) + 12)

答案 2 :(得分:2)

以下是另一种方法:

撰写合同,目的和标题:

;; apply-double : function -> number -> any
;; to apply a given function to double a given number
(define (apply-double fun num) ...)

写一些测试:

(= (apply-double identity 10) 20)
(= (apply-double - 15) -30)
(= (apply-double / 7) 1/14)

定义功能:

(define (apply-double fun num) 
  (fun (* 2 num)))

这是此处食谱的缩写:http://www.htdp.org/2003-09-26/Book/