注册 登录
编程论坛 Delphi论坛

一个除法算式

haohhz 发布于 2006-12-22 17:16, 1470 次点击

s:=1000;
v:=300;
d:=s/v;
用什么方法使d:=4
如果v:=200的时,d:=5,,
用什么才可以...

帮忙呀..

3 回复
#2
nongen2006-12-23 08:51
s mod v 判断余数,有余就在s div v 上加1
#3
volte2006-12-23 14:07

可以使用Unit Math中的Ceil函数。

也可以使用Floor函数取整 + 1; (往小的方面)
Trunc函数仅仅取整数。

也可以使用FormatFloat('0', Double1)或者Round 函数四舍五入,
然后根据你的需要进行设置!!

#4
haohhz2006-12-23 19:59
谢谢了,,,以解决了.
1