Add solution in racket for problem 002