计划，球拍的帮助。如果满足条件，我想返回number
代码如下：
(define make-simple-sv-num
(lambda (delare)
(let ((tal (random-from-to 100000 1000000)))
(cond ((= (divisible? (sum-of-digits tal) delare) #t) tal)
(else (make-simple-sv-num))))))所以我的规范是生成一个随机的6位数，它也可以被输入变量"delare“除以。
我对代码的思考过程是将"tal“绑定到随机数上，然后在计算中使用它，如果验证无误，它将返回"tal”中的数字。然而，如果它不满足条件，它将调用自己，我的想法是，当它这样做时，它会给"tal“一个新的随机数，并继续这样做，直到条件满足，从而给我想要的类型的数字。
我得到了这个错误，但我不知道如何修复它
=: contract violation
expected: number?
given: #t
argument position: 1st
other arguments...:回答 1
Stack Overflow用户
发布于 2017-01-31 10:19:28
我认为你的代码可以简单得多，就像：
(define (make-simple-sv-num declare)
(let ([tal (random-from-to 100000 1000000)])
(if (divisible? (sum-of-digits tal) delare)
tal
(make-simple-sv-num declare))))页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/41913609
复制相关文章
点击加载更多
相似问题
node log4js maxlogsize不起作用
log4js npm错误，log4js配置
转义花括号在LOG4Js -替换{模式}{regex}{替换}
布局-土地概念在景观模式下不起作用
Log4js配置错误
添加站长 进交流群
领取专属 10元无门槛券
AI混元助手 在线答疑
关注 腾讯云开发者公众号
洞察 腾讯核心技术
剖析业界实践案例
腾讯云开发者
