add racket solution to q043
add function "divisible?"