Entries from 2013-11-01 to 1 month
--約数を調べる関数 factors::Int->[Int] factors n = [x | x <- [1..n], n `mod` x == 0] --素数かどうか判定する関数 prime::Int->Bool prime n = factors n == [1, n] --指定された数までの素数を調べる関数 primes::Int->[Int] primes n = [x | x <- [2.…
--約数を調べる関数 factors::Int->[Int] factors n = [x | x <- [1..n], n `mod` x == 0] --素数かどうか判定する関数 prime::Int->Bool prime n = factors n == [1, n] --指定された数までの素数を調べる関数 primes::Int->[Int] primes n = [x | x <- [2.…