--perl对一个数字开平方

#!/usr/bin/perl

my $a = 4;
my $b = sqrt($a);

print "\$b is $b ";

posted @ 2009-04-06 12:04  mop  阅读(1165)  评论(0)  编辑  收藏  举报