久々に、Project Eulerの問題を解いてみた。
まだまだ力不足だなあ、と感じる。もっと文法をしっかり理解しないと
最初の100個の自然数について和の二乗と二乗の和の差を求めよ
a = (\n -> n*n) $ sum [1..100]
b = sum $ map (\n -> n*n) [1..100]
main = print $ a-b
mainの中でするっとおさめたかったけど、上のa,bの式をそのままmain内に書き込むだけでは出来なかった。予想はしてたけど笑
うーん。
実行結果は 25164150