\documentclass[12pt,a4paper]{report}
\usepackage{amsthm}
\usepackage{amsmath}
\usepackage{amsfonts}
\usepackage{amssymb}
\usepackage{mathrsfs}
%\usepackage{fancyhdr}
%\usepackage{fancybox}
\usepackage[framemethod=defualt]{mdframed}
\usepackage{fancyvrb}
\usepackage{makeidx}
\usepackage{multicol}
\usepackage{alltt}
\usepackage{color,graphicx}
%%%%%
\makeindex
\def\indextoo#1{\index{#1}}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%دستوری برای وارد کردن واژه‌نامه انگلیسی به فارسی
\newcommand\persiangloss[2]{#1\dotfill\lr{#2}\\}

\newcommand\persianglosses[2]{#1 ,\hspace*{.5cm}{#2}\\}
%بسته‌ای برای تنطیم حاشیه‌های بالا، پایین، چپ و راست صفحه
%\usepackage[top=50mm, bottom=50mm, left=50mm, right=50mm]{geometry}
% بسته‌ و دستوراتی برای ایجاد لینک‌های رنگی با امکان جهش
%\usepackage[pagebackref=false,colorlinks,linkcolor=blue,citecolor=magenta]{hyperref}%cyan
% چنانچه قصد پرینت گرفتن نوشته خود را دارید، خط بالا را غیرفعال و  از دستور زیر استفاده کنید چون در صورت استفاده از دستور زیر‌‌، 
% لینک‌ها به رنگ سیاه ظاهر خواهند شد و برای پرینت گرفتن، مناسب‌تر خواهد بود
\usepackage[pagebackref=false]{hyperref}
%%%%%%%%
%فراخوانی بسته زی‌پرشین و دستورات مربوط به نوع فونت‌ها
\usepackage{xepersian}
%دستور \usepackage{xepersian} باید بعد از همه بسته‌ها  (پکیج‌ها)گذاشته شود یعنی زیپرشین آخرین بسته‌ای باید باشد که فراخوانی می‌کنید
\settextfont[Scale=1.1]{Yas}
% \setlatintextfont[Scale=1]{Junicode}
\setdigitfont[Scale=1]{Yas}   
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% تعریف قلم‌های فارسی و انگلیسی برای استفاده در بعضی از قسمت‌های متن
\defpersianfont\nastaliq[Scale=2]{IranNastaliq}
\defpersianfont\nastaliqq[Scale=1.5]{IranNastaliq}
\defpersianfont\niloofar[Scale=1.1]{XB Niloofar}
	\defpersianfont\xyas[Scale=1.1]{Yas}   
		\defpersianfont\xtitre[Scale=1.2]{XB Titre}
%\defpersianfont\traffic[Scale=1]{B Traffic}
%\defpersianfont\yekan[Scale=1]{B Yekan}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% تعریف و نحوه ظاهر شدن قضایا، لم‌ها، تعریف‌ها و ...
\theoremstyle{definition}
\newtheorem{definition}{تعریف}[chapter]
%\theoremstyle{theorem}
\newtheorem{theorem}[definition]{{\bf قضیه}}
\newtheorem{lemma}[definition]{{\bf لم}}
\newtheorem{proposition}[definition]{{\bf گزاره}}
\newtheorem{corollary}[definition]{{\bf نتیجه}}
\newtheorem{namad}[definition]{\bf نمادگذاری}
\newtheorem{note}[definition]{{\bf نکته}} 
%\theoremstyle{definition}
\newtheorem{example}[definition]{{\bf مثال}}
\newtheorem{dad}[definition]{{\bf قرارداد}}
\newenvironment{prof}{{\par\noindent\bf اثبات.}}{\hfill{$\square$}\par}
%%%%%%%%%%%%%%%%%%
%\def\thedefinition{\mbox{\beginL\arabic{definition}.\arabic{chapter}\endL}}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\renewcommand{\bibname}{\centerline{فهرست مراجع }}  
\renewcommand{\indexname}{\centerline{فهرست راهنما }}  
%%%%%%%%%%%%%%%%%%%
\textheight=22cm%تنظیم طول متن   
\textwidth=14.7cm%تنظیم عرض متن 
\topmargin=-.5cm%تنظیم حاشیه بالای صفحه 
\oddsidemargin=.1cm%تنظیم حاشیه سمت چپ صفحه  
%\headsep=1cm%     فاصله متن از سر برگ   
\footskip=1.4cm% فاصله شماره صفحه از انتهای متن 
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\newcommand{\thm}[1]{\begin{theorem}#1\end{theorem}} %قضیه
\newcommand{\pro}[1]{\begin{prof} #1\end{prof}}%اثبات.
\newcommand{\ex}[1]{\begin{example}{\rm #1}\end{example}}%مثال
\newcommand{\lema}[1]{\begin{lemma}#1\end{lemma}}%لم
\newcommand{\defi}[1]{\begin{definition} #1\end{definition}}%تعریف
\newcommand{\da}[1]{\begin{dad}#1\end{dad}}%قرارداد
\newcommand{\bcol}[1]{\begin{corollary}#1\end{corollary}}%نتیجه
\newcommand{\bnote}[1]{\begin{note}#1\end{note}}%نکته
\newcommand{\prop}[1]{\begin{proposition}{\rm #1}\end{proposition}}%گزاره  
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%\numberwithin{equation}{chapter}
\def\theequation{\mbox{\beginL\arabic{equation}.\arabic{chapter}\endL}}
%دستور بالا برای دلخواه‌کردن شماره‌گذاری فرمول‌ها است.
%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%
\renewcommand{\contentsname}{\centerline{فهرست مطالب }}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

%%%%%%%%%%%%%%%%%%%%%%%%
%برای وسط چین شدن عنوان فصل ها
\makeatletter\def\@makechapterhead#1{\vspace*{50\p@}{\parindent \z@ \centering \normalfont
    \ifnum \c@secnumdepth >\m@ne\huge\bfseries \@chapapp\space \thechapter\par\nobreak
        \vskip 20\p@\fi \interlinepenalty\@M\Huge \bfseries #1\par\nobreak\vskip 40\p@}}\makeatother
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% تغییر در فهرست مطالب
\makeatletter\renewcommand{\@starttoc}[1]{  \hboxR to \textwidth{عنوان \hfill صفحه}  \begingroup    \makeatletter   \@input{\jobname.#1}    \if@filesw      \expandafter\newwrite\csname tf@#1\endcsname     \immediate\openout \csname tf@#1\endcsname \jobname.#1\relax    \fi \@nobreakfalse  \endgroup } \makeatother
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

%%%%%%%%%%%%%%%%%%%%%%%
%برای تغییر آ به الف در شمارنده‌ی ابجد 
\makeatletter
\def\@abjad#1{\ifcase#1\or آ \or ب\or پ\or ت\or ث‌\or
ج\or چ\or ح\or خ\or د\or ذ\or ر\or ز\or ژ\or \else\@ctrerr\fi}
\makeatother
%%%%%%%%%%%%%%%%%%%%%%%%

\begin{document}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 \label{Title}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%



%\listoffigures
%\newpage
\newpage
\baselineskip=1.1cm
\pagenumbering{arabic}
\setcounter{page}{1}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%  متن خود را از اینجا شروع کنید:
\baselineskip=1.1cm 

الگوریتم سیمپکس شبکه، در هر تکرار ساختار  درخت پوشا را برقرار نگه می‌دارد و به‌طور متوالی آن را بهبود می‌دهد تا زمانی‌که بهینه شود. ابتدا یک نمای کلی از الگوریتم را آورده و سپس به تشریح آن می‌پردازیم. گام‌های اساسی این روش در زیر بیان شده است:
\baselineskip=.7cm

\begin{LTR}
\begin{mdframed}[linecolor=blue,linewidth=2pt]
\begin{alltt}
algorithm network simplex;
begin
      determine an initial feasible tree structure (T,L,U);
      let x be the flow and \(\pi\) be the node petentials 
         associated with this tree structure;
      while some nontree arc violetes the optimality conditions do 
      begin
             select an entering arc(k,l) violating its optimality 
              conditions;
             add arc(k,l) to the tree and determine the leaving
              arc(p,q);
             perform a tree update and update the solutions
              x and \(\pi\);
      end;
end;              
\end{alltt}
\end{mdframed}

\end{LTR}

\end{document}