数值圆整

caoliu023 · 发表于 2022-9-20 16:32:50

菜卷鱼发表于 2022-9-20 15:09
我半小时写个程序收别人5块钱别人都觉得不划算

至少50起步，一包烟钱得有吧！

masterlong · 发表于 2022-9-20 16:49:53

没2W写个毛啊

yoyoho · 发表于 2022-9-20 22:37:12

谢谢! 黄大师分享程序!!!!!

wrf610051 · 发表于 2022-9-21 06:17:24

黄大师的，都想看看，谢谢大师的分享。

vlisp2012 · 发表于 2022-9-21 17:45:48

多谢分享了!

edsion24 · 发表于 2022-9-21 19:54:58

看看大神成果

罗尼 · 发表于 2022-9-22 12:21:35

感谢黄大师分享

llsheng_73 · 发表于 2022-9-22 15:14:56

菜卷鱼发表于 2022-9-20 15:09
我半小时写个程序收别人5块钱别人都觉得不划算

要么收费500或1000起步要么免费就没人觉得贵了

mahuan1279 · 发表于 2022-9-22 15:22:34

本帖最后由 mahuan1279 于 2022-9-22 17:11 编辑

看看啥思路。原来是字符串处理。直接数值运算应该也可以吧。

_$ (defun f(num)
(+ (fix num) (* (setq a (rem (fix num) 10)) -1) (if (< a 3) 0 (if (< a 8) 5 10)))
)
F
_$ (f 32.5)
30
_$ (f 37.5)
35
_$ (f 38.5)
40
_$

自贡黄明儒 · 发表于 2022-9-22 19:51:37

llsheng_73 发表于 2022-9-22 15:14
要么收费500或1000起步要么免费就没人觉得贵了

对的。菜卷鱼严重扰乱市场

账号		自动登录	找回密码
密码			注册

[机械] 数值圆整