A:integer;
B:integer;
C:double;
D:double;C++语法一般为:
A=int((c/d)*b);即两个浮点数相除的结果再与一个整数相乘,最后赋予一个整数,在delphi中这条表达式我应如何转换呢?
B:integer;
C:double;
D:double;C++语法一般为:
A=int((c/d)*b);即两个浮点数相除的结果再与一个整数相乘,最后赋予一个整数,在delphi中这条表达式我应如何转换呢?
解决方案 »
- AThread.Connection.ReadInteger()接收数据出错
- 非常棘手的问题? 在线等待
- 散!
- 实时显示当前记录,添加记录时出错
- 有哪位兄弟知道水晶报表9.0(Crystal)企业版中的那个Report Application Server (RAS)的密码是多少??高分求救。
- 日期型数据怎么样用ADOQUERY添加到数据库中
- ADO出错信息列表
- 何处有完整的SQL-SERVER PACK2光盘或其中MSDE更新包中SETUP目录中所有16个文件可下载?
- Delphi源代码转化为C++(MFC)???
- 请问如何用SQL语句计算相同条件的值的合并把该合赋给一个变量
- 变量调用的问题(在线)
- 自学编程也有两年了,对VB\VC\DELPHI\JAVA\ASP都有所了解,看一些代码也能看懂个70-80%,可是要编个东西就是无从下手,不知该如何提高?请
a := BCDToInteger(DoubleToBCD(c/d*b))即可
a := Trunc(c / d) * b; 截去小数点
如:
a := Round ( (c / d) * b ); 四舍五入
a := Trunc ( (c / d) * b ); 截去小数点
因为无论提前进行四舍五入或截去小数点都可能产生很大的误差,而最后误差最多是1。
如 Round(5/2)*100=300 Round(5/2*100)=250