Scheme咋实现取余数(%)
在Scheme里可以用(remainder a b)来求a%b的值。
■网友
用减法
■网友
有内置的remainder函数。
■网友(define (myremainder n x) (if (\u0026lt; n 0) (+ n x) (myremainder (- n x) x)))
■网友
先设一个变量存储余数,然后用被除数减除数,递归,当被除数小于除数时,返回值
■网友
内置modulo函数~~(顺带插上刚写的scheme求质数的过程)(define (prime? num)\t(define (prime-iteration num div)\t\t(if (= div 1)\t\t\t#t\t\t\t(if (= (modulo num div) 0)\t\t\t\t#f\t\t\t\t(prime-iteration num (- div 1))\t\t\t)\t\t)\t)\t(if (\u0026lt; num 2)\t\t#f\t\t(prime-iteration num (- num 1)) ;函数首先执行这一部分\t))
推荐阅读
- 北京22家市属医院均开展安检基本实现重点区域安检措施全覆盖
- 长江流域渔民退捕“上岸”实现扩产新致富
- 实现“甜蜜计划”,这对中哈跨国夫妻好甜
- 北京地铁11号线西段三座车站提前实现主体结构封顶
- 特斯拉|特斯拉将全面发布全自动驾驶软件最新版,曾承诺年底实现完全无人干预
- |徐州建有农家书屋2205家,实现数字书屋全覆盖
- 阿里云|【GET2020】阿里云解航:在线教育帮助线下教育一起实现教育公平和个性化
- 我有几个app点子,拉出来比较容易实现的一个和大家探讨,只差程序员(替你们说了)请问这个点子咋样
- 一个利用量子纠缠实现超光速通讯的构想,可行吗
- 请问计算器求积分,求导,求极限怎样实现