Added problem 17 text
Problem 17 Haskell