Chinaunix

标题: 用perl写一个求平均数的程序 [打印本页]

作者: 原星87    时间: 2011-03-28 16:37
标题: 用perl写一个求平均数的程序
怎样用perl编写一个求平均数的程序啊!刚刚开始学习,编程有点困难
作者: jason680    时间: 2011-03-28 16:42
怎样用perl编写一个求平均数的程序啊!刚刚开始学习,编程有点困难
原星87 发表于 2011-03-28 16:37



# perl -e '@n=qw(1 2 3 4 5 6);$t+=$_ for(@n); print "avg=" .$t/scalar(@n)."\n";'
avg=3.5
作者: 原星87    时间: 2011-03-29 16:15
回复 2# jason680


    非常感谢哦!




欢迎光临 Chinaunix (http://bbs.chinaunix.net/) Powered by Discuz! X3.2