2011-06-07から1日間の記事一覧

エラトステネスの篩がたったの 4 行 !

primes :: [Int] primes = sieve [2..] sieve :: [Int] -> [Int] sieve (p : xs) = p : sieve [x | x <- xs, x `mod` p /= 0] 目から鱗でござった。

演算子を使わずに加法

Twitter でとある方が「+ 演算子を使わずに a と b の和を求める方法を…」といったことをつぶやいていたので、ちょっと作ってみた。 #include <stdio.h> int add(int, int); int main() { printf("%d\n", add(2, 3)); printf("%d\n", add(2, - 3)); return 0; } int a</stdio.h>…