Problem 1包除原理を使うのはやめて、本来の書き方ではないのですがループを使いましょう。 while $n = 1000 $s = 0 $k = 1 while($k -lt $n) { if($k % 3 -eq 0 -or $k % 5 -eq 0) { $s += $k } $k += 1 } $s whileはCとだいたい同じです。ただ、比較演算子…

http://projecteuler.net/index.php?section=problems&id=38888着。結局ぶん回して。