发信人: zhcharles(小传)
整理人: workingnow(2002-09-30 12:01:53), 站内信件
|
【 在 david.hjy 的大作中提到：】
:谢谢！！
:......
sub 四舍五入 {
my $num = shift;
if($num - int($num) >= 0.5) {
return (int($num) + 1);
}
else {
return int($num);
}
}
my $this_num = 四舍五入(4.5);
返回 5
----
█████████
█┌─────┐█
█│zhcharles │█
█│ CGI 版 │█
█│ 版 ★ 斧 │█
█│ 专用章 │█
█└─────┘█
█████████
答之意，乃解问者之困也！
我无意将答案写得如何如何动听，只求能真正地解决您的问题！
小传 ( Charles Feng ) [email protected] OICQ:17866295
|
|