2007-08-06から1日間の記事一覧
関連検索が「しんや」「関レレ」でした。そんなに書いてたかな? 書いてたかも。コンスタントに毎月。。。
http://ja.doukaku.org/40/より。ふつうです。Integerを使ってIntの制限を越えられるようにしてみました。こういう場合は、Data.ListモジュールのgenericXXX関数を使います。 module Main (main) where import Data.List (genericLength) keta :: Integer ->…
20:00ごろ帰りました。
ふつうに組合せnCkをHaskellで書くとこうなります。数式は、n! / (k!・(n - k)!)です。 fact :: Int -> Int fact n = product [1 .. n] comb :: Int -> Int -> Int comb n k = fact n `div` (fact k * fact (n - k)) これを下降階乗羃(falling factorial)を…