Summary: This paper introduces some applications of Mathematica in drawing geometrical graphics and gives a common method to get the parametric function of surface of revolution in three-dimensional space. The Mathematica programs of several examples on the surfaces are given.