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