enixing 发表于 2008-5-9 11:07:00

给rem惹毛了，请问怎么求余数

<p>用（rem 50 5）返回是5.0，</p><p>如果是（rem 49 5）返回4，</p><p>貌似整除的情况就返回除数，请问怎么才能返回真正的余数呢，就是50/5返回0</p>

无痕 发表于 2008-5-9 14:22:00

(- a(*(fix (/ a b))b))

英雄无敌 发表于 2008-5-9 11:39:00

<p>不会吧，我用一下(rem 50 5)返回的是0</p>

英雄无敌 发表于 2008-5-9 11:48:00

<p>不过试了一下(rem 10.2 0.3)反回0.3</p><p>你可以试一下这个自定义的函数，只对整数有用，小数是不对的。</p><p>(defun getmod (sdiv ldiv)<br/>;;求余数<br/>&nbsp; (fix<br/>&nbsp;&nbsp;&nbsp; (+ (* (- (/ sdiv 1.0 ldiv) (/ (fix sdiv) (fix ldiv))) ldiv)<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 0.5<br/>&nbsp;&nbsp;&nbsp; )<br/>&nbsp; )<br/>)</p><p></p>
页: [1]
查看完整版本: 给rem惹毛了，请问怎么求余数