Classical Mechanics with Mathematica (Modeling and