落研合宿前の友人との旅行企画！ に今小豆島を候補に入れてもらった！ わくわく。 結局どこにいくのかはっまだ決定しないけれど、何にせよ楽しみです

a = 50 b = 2000 c = 40 main = putStrLn s s :: String s = show.sum $ map f [0..b] f :: Integer -> Integer f n | n > b = n - c | n <= b = f (a+ f (a+ f (a+ f (a+n)))) 試験勉強してたらHaskell触りたくなって 340番の問題に挑戦！ これは例題として…