feat: Added Haskell and Go.

haskell/app/Main.hs

@@ -0,0 +1,19 @@
+#!/usr/bin/env stack
+-- stack runghc
+
+import Risk
+
+maximum' :: Ord a => [a] -> a
+maximum' = foldr1 (\x y ->if x >= y then x else y)
+
+maximum'' :: Ord a => [a] -> a
+maximum'' [x]       = x
+maximum'' (x:x':xs) = maximum' ((if x >= x' then x else x'):xs)
+
+a :: [Int]
+a = [3,5,8,6]
+
+main :: IO ()
+main = print $ maximum'' a
+-- main = print $ possibleOutcomes 3 3 
+-- main = print $ Result(3, 5) + Result(1, 2)