\documentclass[a4paper,12pt]{report}

\usepackage{graphicx}
\usepackage{amsthm,amssymb,amsmath,mathrsfs,amsfonts}
\begin{document}
\newcount\mycounter
\newcount\elevation
\elevation = 52
\def\repeatc#1{\mycounter=0
\loop \ifnum\mycounter<#1 \advance \mycounter by 1
\advance \elevation  by 7
\put(\elevation,25){\number\mycounter}\repeat}
\setlength{\unitlength}{1mm}
\begin{picture}(30, 40)
%\multiput(x, y)(Δx,Δy){n}{object}
\multiput(60,30)(7,0){5}{\circle*{1}}
\multiput(60,30)(1,0){7}{\circle*{0.5}}
\repeatc{5}
\end{picture}

\end{document}