chobie https://blog.hatena.ne.jp/chobie/ s/.*// https://chobie.hatenadiary.org/ Smalltalk Squeak 問題5 1から20のどれでも割り切れる数を求める。 ようするに、最小公倍数てことでしょ。Gaucheで。 (lcm 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20) これでは話が展開しないので。 ^(1 to: 20) inject: 1 into: [ :tmp :each | | gcd next | gcd := tmp gcd: each. next := gcd >= 1 ifTrue: [ tmp * (each / gcd) ] ifFalse: [ tmp ]. next ]. というところまで考えて、wikipediaの記… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fchobie.hatenadiary.org%2Fentry%2F20080424%2F1208991629" title="Project Euler 005 - s/.*//" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> Hatena Blog https://hatena.blog 2008-04-24 08:00:29 rich https://chobie.hatenadiary.org/entry/20080424/1208991629 1.0 100%