设计算机二级考试网为首页 | 注册 | 登陆


 下载｜书店 ｜ 论坛｜(QQ群：32090693)
您现在的位置： 优易学 >> 计算机 >> 计算机二级 >> Delphi >> Delphi综合辅导 >> 正文
 
站内搜索:
计算机二级辅导:Delphi的四舍五入函数
来源：优易学  2011-6-7 12:07:19   【优易学：中国教育考试门户网】   资料下载   IT书店
　　下面是DELPHI的四舍五入函数，很简单的一个函数不过也是很重要的一个函数哦！
　　function x_round(x: double): double;
　　var
　　x10: double;
　　xx: integer;
　　begin
　　x10 := abs(x) * 100 + 0.5;
　　xx := trunc(x10);
　　result := xx / 100;
　　if x<0 then
　　result:=-result;
　　end;

责任编辑：小草

文章搜索:
 相关文章
热点资讯
资讯快报
热门课程培训