看板 [ Perl ]
討論串[問題] 計算問題
共 3 篇文章
首頁
上一頁
1
下一頁
尾頁

推噓0(0推 0噓 0→)留言0則,0人參與, 最新作者giacch (小a)時間17年前 (2008/09/03 23:43), 編輯資訊
0
0
0
內容預覽:
use strict;. my ($sum, $n);. while ($sum <= 100) {. # $sum+=$n;. # $n++;. $sum += ++ $n;. print "\$sum = $sum\t\$n = $n\n"; # 加上這行方便除錯.... }. #print $

推噓0(0推 0噓 0→)留言0則,0人參與, 最新作者abliou (把青春freeze)時間17年前 (2008/09/03 16:16), 編輯資訊
0
0
0
內容預覽:
while(1){. $sum+$n+1<=100? $n++ : last ;. $sum+=$n;. }. print $n ;. --. 發信站: 批踢踢實業坊(ptt.cc). ◆ From: 59.126.34.230. 編輯: abliou 來自: 59.126.34.230 (

推噓2(2推 0噓 2→)留言4則,0人參與, 最新作者mayalu (小君)時間17年前 (2008/09/03 12:08), 編輯資訊
0
0
0
內容預覽:
題目是:從1加到n,那麼在累加結果不超過100,n的最大值應該是多少?. 以下是程式碼:. use strict;. my ($sum, $n);. while ($sum <= 100) {. $sum+=$n;. $n++;. }. print $n;. 看起來覺得是對的, 可是答案錯了. 應該
首頁
上一頁
1
下一頁
尾頁