Added Haskell solution to problem 3 (PE003.hs)