Re: [問題] 一個很小的程式~~

看板Perl作者時間19年前 (2004/10/02 03:04), 編輯推噓0(000)
留言0則, 0人參與, 最新討論串3/4 (看更多)
※ 引述《littleshan (我要加入劍道社!)》之銘言: : ※ 引述《krist99 (只愛Calvin Klein ￾ I》之銘言: : : 請問要怎麼把1 3 5 7 9加起來~~ : : 我想好幾個小時~~~想不出來~~ : : 請各位大大開導~~ : : 不一定要po程式碼~~ : : 跟我講方法也行~~ : : 感恩~~ : : sub total{ : : foreach(@fred){ : : @fred+=1; : 你可以解釋一下為什麼你要這樣寫嗎? ㄟ~~ 二行foreach那裡~~是想說fred有幾個他迴圈就會跑幾次~~ 接下來那一行是想說他會一個一個加下去(ex:$fred[0]+$fred[1].....) 感謝您的指教^^ ㄟ~~其實我不是很懂你寫的~~ 方便解釋一下嗎??最長的那一行就好~~謝謝^^ : : } : : } : sub total{ : my $sum; : $sum += $_ foreach (@_); : return $sum; : } : : my @fred=qw/1 3 5 7 9/; : : my $fred_total=&total(@fred); : : print"\@fred的總和是$fred_total\n"; -- http://www.wretch.twbbs.org/album/krist ^^" -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 218.162.200.27 ※ 編輯: krist99 來自: 218.162.200.27 (10/02 03:11)
文章代碼(AID): #11NQfL-r (Perl)
討論串 (同標題文章)
文章代碼(AID): #11NQfL-r (Perl)