inamori https://blog.hatena.ne.jp/inamori/ inamori’s diary https://inamori.hateblo.jp/ Haskell http://projecteuler.net/index.php?section=problems&id=75 ピタゴラスの数の生成式を使って周囲の長さをリストにする。例えば60までなら、 [12,24,36,48,60,30,60,40,56] これをMapに入れようとしたが、メモリが足りない。 import qualified Data.Map as M import Data.List l = 15 * 10^5 perimeters = [ 2 * k * m * n | m <- [2..div l 6], n <- [m+1..min (m*2-1) (div l (2*m))]… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Finamori.hateblo.jp%2Fentry%2F20100308%2Fp2" title="Project Euler 75 - inamori’s diary" 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 2010-03-08 00:00:01 rich https://inamori.hateblo.jp/entry/20100308/p2 1.0 100%