problem-1.clj

(apply + (filter #(or (zero? (mod % 3)) (zero? (mod % 5))) (range 1000)))

余談ですが，最近「仕様」だとか「設計」だとか，それらに対するベンダ・プログラマの態度・姿勢について考えています．(range n) と (range 1 n) は，それらについてのヒントになりました．ありがとうございます．

@tnoda よく分かりませんが、お役に立てたならうれしいです。また考えた結果について教えていただけるとうれしいです。

rangeという名前の関数から想像できる動作として「開始と終了のふたつを指定して、その範囲の値を生成する」のは自然だとぼくは思います。ですので、開始・終了がはっきり見える (range from to)が良い、なんてのはどうでしょう？

でも (range 0 1000) と書いても 0 や 1000 を含むかどうかが分からないですね ([:-P