categoryPerl覚書

平均

trackback1  comment0
プログラミング覚書 Perl-024

平均
----------------------------------------------------------------------

$sum = 0;
@a = (1, 2, 3, 4, 5, 6, 7, 8, 9, 10);
foreach $b (@a) {
$sum += $b;
}
$sum /= @a;
print "平均は $sum です。\n";
# 平均は 5.5 です。

----------------------------------------------------------------------
関連記事
 









        
 
http://greenwind888.blog.fc2.com/tb.php/249-b12ecb9e
まとめtyaiました【平均】
プログラミング覚書 Perl-024平均----------------------------------------------------------------------$sum = 0;@a = (1, 2, 3, 4, 5, 6, 7, 8, 9, 10);foreach $b (@