社区
语言基础/算法/系统设计
帖子详情
DELPHI有关算法!
78hgdong
2004-12-10 02:58:49
订单数(ORDER) 余量(YU) 实数量(SUMO)
500以下 5 SUMO=?
500-1000 1% SUMO=?
1000-1500 0.85%不是 SUMO=?
1500-2000 0.8% SUMO=?
2000以上 每1000增加2个 SUMO=?
例如:
现有495个货号,实数量SUMO=495+5
有550个,SUMO=550+(550*1%)
...
...
...
请问用DELPHI怎样写上述的几个条件,当输入"订单数"后自动计算出"实数量".
...全文
115
7
打赏
收藏
DELPHI有关算法!
订单数(ORDER) 余量(YU) 实数量(SUMO) 500以下 5 SUMO=? 500-1000 1% SUMO=? 1000-1500 0.85%不是 SUMO=? 1500-2000 0.8% SUMO=? 2000以上 每1000增加2个 SUMO=? 例如: 现有495个货号,实数量SUMO=495+5 有550个,SUMO=550+(550*1%) ... ... ... 请问用DELPHI怎样写上述的几个条件,当输入"订单数"后自动计算出"实数量".
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
7 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
surpassable
2004-12-10
打赏
举报
回复
up~~~~~~
78hgdong
2004-12-10
打赏
举报
回复
是啊,就是觉得这个条件:订单数2000以上 每1000增加2个 不知如何表达???
如:
输入的订单数是3005,则SUMO=3005+2=3007,以此类推.
JavaD
2004-12-10
打赏
举报
回复
case count of
0..500:result := count + 5;
501..1000:result := round(count*(1+1%));
1001..1500:result:= round(count*(1+0.85));
1501..2000:result:= round(count*(1+0.8));
else result:= (count div 1000) *2 + count;
end;
flyforlove
2004-12-10
打赏
举报
回复
对呀,段间有规律,判断订单数,判断属于哪个段,然后按照本段的规律计算就可以了。
lzy6204
2004-12-10
打赏
举报
回复
用SQL语句就可以实现
JavaD
2004-12-10
打赏
举报
回复
case count of
0..500:result := count + 5;
501..1000:result := round(count*(1+1%));
1001..1500:result:= round(count*(1+0.85));
1501..2000:result:= round(count*(1+0.85));
else result:= round(count*(1+0.8));
耙子
2004-12-10
打赏
举报
回复
这不就是一个典型的分段函数嘛。
delphi
算法
大全(非常全)
常用
DELPHI
实现
算法
大全收集很多,比目前网络多很多,主要涉及
算法
几种
Delphi
压缩
算法
.rar
收集了几种
Delphi
压缩
算法
,因为网上见到的代码大部分为C语言实现的程序,给
delphi
的爱好者们使用和研究压缩
算法
带来极大不便。为改变这一面貌,特收集了一些
算法
奉献给
delphi
的爱好者们。其中lz77.pas和arith.pas翻译自王咏刚先生的《笨笨数据压缩教程》中的相关C实现。lh5unit.pas为网上见到的一个
算法
,还没有去深入研究它,也放在了这里。lz77.pas为borland公布的
算法
,但其核心实现是C语言,为了比较,也放在了这里。
Delphi
XE10零基础实战快速入门
通过课堂上一个一个的实战例子,演示
Delphi
XE10的用法,最后通过一个完整的通讯录程序,让学员初步掌握软件开发的全部流程让零基础学员快速入门
Delphi
编程,快速掌握
Delphi
的使用方法,并能够制作出自己的软件来。为同学们下一步的提高打下坚实的基础。
Delphi
蚂蚁
算法
代码
Delphi
蚂蚁
算法
代码
delphi
算法
与数据结构
delphi
算法
与数据结构,这本书使用
delphi
语言讲解
算法
和数据结构,pdf内容清晰。
语言基础/算法/系统设计
16,748
社区成员
33,247
社区内容
发帖
与我相关
我的任务
语言基础/算法/系统设计
Delphi 语言基础/算法/系统设计
复制链接
扫一扫
分享
社区描述
Delphi 语言基础/算法/系统设计
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章