noritsuguの日記

2009-04-18``Algorithms'' (43) Exercise 2.14

型の定義

cube   :: Int -> Int
cube x =  x * x * x

maxi :: Int -> Int -> Int
maxi x y | x >= y    = x
         | otherwise = y

sumAtoB     :: Int -> Int -> Int
sumAtoB a b =  sum [a..b]

で、

*Main> cube 2
8
*Main> maxi 1 2
2
*Main> sumAtoB 1 10
55

ゲスト



トラックバック - http://haskell.g.hatena.ne.jp/noritsugu/20090418