Problem 20
Problem 20です。
import Data.Char (digitToInt) main = print . sum . map digitToInt $ show . product $ [1..100]
シンプルに計算するだけで簡単に出来ました。
Problem 20です。
import Data.Char (digitToInt) main = print . sum . map digitToInt $ show . product $ [1..100]
シンプルに計算するだけで簡単に出来ました。