プログラミングのお題スレ Part6©5ch.io
■ このスレッドは過去ログ倉庫に格納されています
0643デフォルトの名無しさん
2015/03/07(土) 21:27:24.16ID:O2EfnUy2| fn |
fn := [:N |
((1 to: N) select: [:x |
((x isDivisibleBy: 3) or: [x isDivisibleBy: 5])
and: [(x isDivisibleBy: 9) not]]
) sum
].
fn value: 300000 "=> 16000100001 "
■ このスレッドは過去ログ倉庫に格納されています