To solve this problem we apply the theory of analytic functions and formulas of Kolosov-Muskhelishvili in the case of non-uniform radial displacement of the boundary of the circle, represented as a Fourier series. The graphics and computational capabilities of Mathematica was shown. It allows building the distribution of stresses and displacements, using only the general Kolosov-Muskhelishvili formulas and coefficients of potentials calculated in complex form.