发信人: 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
|
|