add Problem24.hs