计算机二级DELPHI函数:Delphi的四舍五入函数计算机二级考试
文章作者 100test 发表时间 2009:05:07 18:06:54
来源 100Test.Com百考试题网
2009年下半年全国计算机等级考试你准备好了没?考计算机等级考试的朋友,2009年下半年全国计算机等级考试时间是2009年9月19日至23日。更多优质资料尽在百考试题论坛 百考试题在线题库
下面是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.