数型转换问题

Question

A:integer;
B:integer;
C:double;
D:double;C++语法一般为：
A=int((c/d)*b);即两个浮点数相除的结果再与一个整数相乘，最后赋予一个整数，在delphi中这条表达式我应如何转换呢？

Answer 1

先引用FmtBCD单元
a := BCDToInteger(DoubleToBCD(c/d*b))即可

Answer 2

a := Round(c / d) * b; 四舍五入
a := Trunc(c / d) * b; 截去小数点

Answer 3

TO juliens(星星球愛思纯^_^) ( )，应该是对 整个表达式求函数运算吧
如：
    a := Round ( (c / d) * b ); 四舍五入
    a := Trunc ( (c / d) * b ); 截去小数点

Answer 4

juliens(星星球愛思纯^_^) 本来已经说对，而skywang0810(太阳神)更好。
因为无论提前进行四舍五入或截去小数点都可能产生很大的误差，而最后误差最多是1。
如 Round（5/2）*100=300     Round（5/2*100)=250