Create task9-07-1.hs