久々に、Project Eulerの問題を解いてみた。 まだまだ力不足だなあ、と感じる。もっと文法をしっかり理解しないと 最初の100個の自然数について和の二乗と二乗の和の差を求めよ a = (\n -> n*n) $ sum [1..100] b = sum $ map (\n -> n*n) [1..100] main = p…

今日は昨日、いや今日1時過ぎまで起きていたため、睡眠時間の正確な私は8時過ぎに起きました笑 朝食食べて、大学に行こうとしたけれど、学生証忘れていったん家に帰る。 到着は9時半。 車運転するのはまだいいが、親と共有なので、乗るたびに若葉マークを張…

メロンから、2011は、157から211までの連続する素数の和だよ、と聞いたのでHaskellで確かめてみた main = print $ sum $ filter prime [157,159..211] prime :: Int -> Bool prime n = prime' n ( (n+1) `div` 2 ) prime' :: Int -> Int -> Bool prime' n 1 …