Problem 15です。20 × 20 のマス目の左上から右下までの最短ルートの数を求める問題です。 main = print $ product [21..40] `div` product [1..20] 高1の数学で習ったような気がしたので、記憶を頼りにやってみました。