Solve Problem 16, Scheme