首页 > 学院 > 开发设计 > 正文

一个四舍五入函数

2019-11-18 18:57:12
字体:
来源:转载
供稿:网友
下面是保岛国整数的四舍五入函数,如果要保岛国n位小数,只需简单修改。
function myround(x : extended) : extended;
begin
if (int(x)*10+5) > int(x*10) then
begin
result := floor(x);
end else
begin
result := ceil(x);
end;
end;

上一篇:Borland有一个梦,程序员的梦

下一篇:在stringgrid控件中使文字内容在cell中做到上下居中

发表评论 共有条评论
用户名: 密码:
验证码: 匿名发表
学习交流
热门图片

新闻热点

疑难解答

图片精选

网友关注