Create Problem.hs

Do problem 1 and simple testing