\documentclass{article}

\usepackage{program}
\usepackage{xepersian}
\begin{document}

\begin{LTR}
\begin{program}
  t:=0 
 |initialize| \AND  |evaluate| [P(t)] 
\WHILE  \NOT |stop-condition| \DO 
       P’ (t)=|variation| [P(t)]; 
       P (t +1)=|select|  [P’(t)]; 
       T:= t+1;
\end{program}
\end{LTR} 

یا 
\begin{latin}
\begin{program}
  t:=0 
 |initialize| \AND  |evaluate| [P(t)] 
\WHILE  \NOT |stop-condition| \DO 
       P’ (t)=|variation| [P(t)]; 
       P (t +1)=|select|  [P’(t)]; 
       T:= t+1;
\end{program}
\end{latin}
\end{document}