Topics in Mathematical Modeling by Difference Equations (With Mathematica)