Create problem7.hs