忘了”四舍五入“函数,求教!!!!!! 忘了”四舍五入“函数,求教!!!!!!忘了”四舍五入“函数,求教!!!!!! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 function round(x: Extended): Int64; function 四舍五入(x:Extended):Int64;begin Result:=Trunc(x+0.5);end; floor 和 ceil 是 math unit 里的函数,使用前要先 Uses Math。 trunc 和 round 是 system unit 里的函数,缺省就可以用。 floor 直接往小的取,比如 floor(-123.55)=-124,floor(123.55)=123 trunc 直接切下整数,比如 trunc(-123.55)=-123, floor(123.55)=123 ceil 直接往大的取,比如 ceil(-123.55)=-123, ceil(123.55)=124 round 计算四舍五入,比如 round(-123.55)=-124,round(123.55)=124 dbgrid中加入button 如何实现将光标置在edit1中的文本后? ****新年散分**** 寻找两个控件 在delphi 上使用 Auto cad R14这样的图形?? 编译一个软件,为什么题是错误没有 Projects/Bpl/Psock.pas NMsmtp.pas文件(在线等) 请问如何求8:10:00和12:30:00之间差多少分钟 几个小问题,谁先答出谁先得分! 如何使radiogroup实现多选功能,有此类控件吗? ADO的数据库如何清空? 客户端的dcom连接在什么时候设置为true好?初始化还是每次调用接口前? 请问怎样取得TADOTable操作出错后的代码?
begin
Result:=Trunc(x+0.5);
end;
trunc 和 round 是 system unit 里的函数,缺省就可以用。
floor 直接往小的取,比如 floor(-123.55)=-124,floor(123.55)=123
trunc 直接切下整数,比如 trunc(-123.55)=-123, floor(123.55)=123
ceil 直接往大的取,比如 ceil(-123.55)=-123, ceil(123.55)=124
round 计算四舍五入,比如 round(-123.55)=-124,round(123.55)=124