[[ProjectEular]]

 -- Problem 29
 
 module Main (main) where
 
 import qualified List as L (nub)
 
 main :: IO ()
 main = print $ problem29
 
 problem29 :: Int
 problem29 = length $ L.nub [ a^b | a <- [2..100], b <- [2..100] ]


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