如何将函数单个整数修复为Racket中的参数

Question

我需要一些人可以解释一下如何做到这一点，

整除×7？

定义您自己的Racket函数，该函数将单个整数作为参数，并返回一个布尔值，指示该数字是否可被7整除。您不必对输入执行错误检查。

输入：整数。

输出：布尔值。

Example:

> (divisible-by-7? 14)
#t
> (divisible-by-7? 31)
#f
> (divisible-by-7? 56)
#t

这就是我所拥有但我一直收到错误

(define (divisible-by-7)
(divisible 7))

Answer 1

似乎divisible不是球拍中的库程序。

尝试

(define (divide-by-7? x)
  (= (remainder x 7) 0))

或者，如果您想在球拍中实施divisible?：

(define (divisible k)
  (lambda (x)
    (= (remainder x k) 0)))

并使用它：

(define divide-by-7?
  (divisible 7))