problem 2-69.rkt