Problem 1

Haskell
Problem_1.hs