เขียน Haskell ครั้งแรก มันก็ไม่ได้ยากมากเท่าไหร่ เพียงอาจจะต้องเปลี่ยนแนวคิดนิดหน่อย
Fibonacci
fib 0 = 1 fib 1 = 1 fib n = fib(n-1)+fib(n-2)
Factorial
fac 0 = 1 fac n = n * fac (n-1)
Summation
s [] = 0 s (x:xs) = x + s (xs)
Length
len [] = 0 len (x:xs) = 1 + len (xs)
Quick Sort
qsort [] = [] qsort (x:xs) = qsort (filter (< x) xs) ++ [x] ++ qsort (filter (>= x) xs)



Recent comments
1 week 5 days ago
6 weeks 14 hours ago
6 weeks 3 days ago
18 weeks 4 days ago
23 weeks 5 days ago
38 weeks 1 day ago
42 weeks 4 days ago
43 weeks 3 days ago
48 weeks 4 days ago
51 weeks 22 hours ago