Added solution to problem 45 in Racket