[[ProjectEular]]

 -- Problem 16
 
 module Main (main) where
 
 import qualified Char (digitToInt)
 
 main :: IO ()
 main = print $ problem16
 
 problem16 :: Int
 problem16 = sum $ map Char.digitToInt $ show $ 2 ^ 1000


トップ   差分 バックアップ リロード   一覧 単語検索 最終更新   ヘルプ   最終更新のRSS