TAXI PASCAL SOLUTION