\documentclass[12pt,a4paper]{article} 

\usepackage[top=20mm, bottom=30mm, left=20mm, right=20mm]{geometry}
\usepackage{amssymb}
\usepackage{amsmath}
\usepackage{amsfonts}
\usepackage{amsthm}
\usepackage{xfrac}
\usepackage{fancyhdr}\usepackage{multicol,ptext}
\usepackage{titlesec}
\usepackage{makeidx}
\usepackage{fontspec} 
\usepackage{graphicx} 
\usepackage[nottoc]{tocbibind}
\usepackage{tocbibind} 
\usepackage{perpage}
\MakePerPage{footnote}
\usepackage{lipsum}
\usepackage{mathrsfs}
\usepackage{hyperref}
\usepackage{setspace} 
\usepackage{color,graphicx} 
\usepackage{framed} 
\usepackage{lastpage}
\usepackage{tikz}
\usetikzlibrary{shapes,arrows,positioning}
\usepackage{supertabular}
\usepackage{xepersian}



\newcounter{question}
\newcommand{\question}[1]{\noindent\stepcounter{question}{\thequestion.} #1}
\newsavebox{\fourja}
\newsavebox{\fourjb}
\newsavebox{\fourjc}
\newsavebox{\fourjd}
\newcommand{\fourj}[4]{%
\sbox\fourja{#1}%
\sbox\fourjb{#2}%
\sbox\fourjc{#3}%
\sbox\fourjd{#4}%
\ifdim\wd\fourja<0.165\textwidth%
\ifdim\wd\fourjb<0.165\textwidth%
\ifdim\wd\fourjc<0.165\textwidth%
\ifdim\wd\fourjd<0.165\textwidth%
\begin{multicols}{4}
\begin{itemize}
\item[{1)}] \usebox{\fourja}
\item[{2)}] \usebox{\fourjb}
\item[{3)}] \usebox{\fourjc}
\item[{4)}] \usebox{\fourjd}
\end{itemize}
\end{multicols}
\else%
\ifdim\wd\fourja<0.4\textwidth%
\ifdim\wd\fourjb<0.4\textwidth%
\ifdim\wd\fourjc<0.4\textwidth%
\ifdim\wd\fourjd<0.4\textwidth%
\begin{multicols}{2}
\begin{itemize}
\item[{1)}] \usebox{\fourja}
\item[{3)}] \usebox{\fourjc}
\item[{2)}] \usebox{\fourjb}
\item[{4)}] \usebox{\fourjd}
\end{itemize}
\end{multicols}
\else
\begin{itemize}
\item[{1)}] \usebox{\fourja}
\item[{2)}] \usebox{\fourjb}
\item[{3)}] \usebox{\fourjc}
\item[{4)}] \usebox{\fourjd}
\end{itemize}
\fi
\else
\begin{itemize}
\item[{1)}] \usebox{\fourja}
\item[{2)}] \usebox{\fourjb}
\item[{3)}] \usebox{\fourjc}
\item[{4)}] \usebox{\fourjd}
\end{itemize}
\fi
\else
\begin{itemize}
\item[{1)}] \usebox{\fourja}
\item[{2)}] \usebox{\fourjb}
\item[{3)}] \usebox{\fourjc}
\item[{4)}] \usebox{\fourjd}
\end{itemize}
\fi
\else
\begin{itemize}
\item[{1)}] \usebox{\fourja}
\item[{2)}] \usebox{\fourjb}
\item[{3)}] \usebox{\fourjc}
\item[{4)}] \usebox{\fourjd}
\end{itemize}
\fi\fi
\else
\ifdim\wd\fourja<0.4\textwidth%
\ifdim\wd\fourjb<0.4\textwidth%
\ifdim\wd\fourjc<0.4\textwidth%
\ifdim\wd\fourjd<0.4\textwidth%
\begin{multicols}{2}
\begin{itemize}
\item[{1)}] \usebox{\fourja}
\item[{3)}] \usebox{\fourjc}
\item[{2)}] \usebox{\fourjb}
\item[{4)}] \usebox{\fourjd}
\end{itemize}
\end{multicols}
\else
\begin{itemize}
\item[{1)}] \usebox{\fourja}
\item[{2)}] \usebox{\fourjb}
\item[{3)}] \usebox{\fourjc}
\item[{4)}] \usebox{\fourjd}
\end{itemize}
\fi
\else
\begin{itemize}
\item[{1)}] \usebox{\fourja}
\item[{2)}] \usebox{\fourjb}
\item[{3)}] \usebox{\fourjc}
\item[{4)}] \usebox{\fourjd}
\end{itemize}
\fi
\else
\begin{itemize}
\item[{1)}] \usebox{\fourja}
\item[{2)}] \usebox{\fourjb}
\item[{3)}] \usebox{\fourjc}
\item[{4)}] \usebox{\fourjd}
\end{itemize}
\fi
\else
\begin{itemize}
\item[{1)}] \usebox{\fourja}
\item[{2)}] \usebox{\fourjb}
\item[{3)}] \usebox{\fourjc}
\item[{4)}] \usebox{\fourjd}
\end{itemize}
\fi\fi
\else
\ifdim\wd\fourja<0.4\textwidth%
\ifdim\wd\fourjb<0.4\textwidth%
\ifdim\wd\fourjc<0.4\textwidth%
\ifdim\wd\fourjd<0.4\textwidth%
\begin{multicols}{2}
\begin{itemize}
\item[{1)}] \usebox{\fourja}
\item[{3)}] \usebox{\fourjc}
\item[{2)}] \usebox{\fourjb}
\item[{4)}] \usebox{\fourjd}
\end{itemize}
\end{multicols}
\else
\begin{itemize}
\item[{1)}] \usebox{\fourja}
\item[{2)}] \usebox{\fourjb}
\item[{3)}] \usebox{\fourjc}
\item[{4)}] \usebox{\fourjd}
\end{itemize}
\fi
\else
\begin{itemize}
\item[{1)}] \usebox{\fourja}
\item[{2)}] \usebox{\fourjb}
\item[{3)}] \usebox{\fourjc}
\item[{4)}] \usebox{\fourjd}
\end{itemize}
\fi
\else
\begin{itemize}
\item[{1)}] \usebox{\fourja}
\item[{2)}] \usebox{\fourjb}
\item[{3)}] \usebox{\fourjc}
\item[{4)}] \usebox{\fourjd}
\end{itemize}
\fi
\else
\begin{itemize}
\item[{1)}] \usebox{\fourja}
\item[{2)}] \usebox{\fourjb}
\item[{3)}] \usebox{\fourjc}
\item[{4)}] \usebox{\fourjd}
\end{itemize}
\fi\fi
\else
\ifdim\wd\fourja<0.4\textwidth%
\ifdim\wd\fourjb<0.4\textwidth%
\ifdim\wd\fourjc<0.4\textwidth%
\ifdim\wd\fourjd<0.4\textwidth%
\begin{multicols}{2}
\begin{itemize}
\item[{1)}] \usebox{\fourja}
\item[{3)}] \usebox{\fourjc}
\item[{2)}] \usebox{\fourjb}
\item[{4)}] \usebox{\fourjd}
\end{itemize}
\end{multicols}
\else
\begin{itemize}
\item[{1)}] \usebox{\fourja}
\item[{2)}] \usebox{\fourjb}
\item[{3)}] \usebox{\fourjc}
\item[{4)}] \usebox{\fourjd}
\end{itemize}
\fi
\else
\begin{itemize}
\item[{1)}] \usebox{\fourja}
\item[{2)}] \usebox{\fourjb}
\item[{3)}] \usebox{\fourjc}
\item[{4)}] \usebox{\fourjd}
\end{itemize}
\fi
\else
\begin{itemize}
\item[{1)}] \usebox{\fourja}
\item[{2)}] \usebox{\fourjb}
\item[{3)}] \usebox{\fourjc}
\item[{4)}] \usebox{\fourjd}
\end{itemize}
\fi
\else
\begin{itemize}
\item[{1)}] \usebox{\fourja}
\item[{2)}] \usebox{\fourjb}
\item[{3)}] \usebox{\fourjc}
\item[{4)}] \usebox{\fourjd}
\end{itemize}
\fi\fi
}


\settextfont[Scale=0.95]{XB Niloofar}

\setdigitfont[Scale=0.95]{XB Yas}
\defpersianfont\Sols[Scale=0.95]{XB Sols}



\renewcommand{\baselinestretch}{1} 
\begin{document}%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 


{\em  
%*********************************************************************************************
\begin{enumerate}
\item\label{1} اگر$\ [a,b]=[-2\ ,\ \dis{8\over3}]\cap[0\ ,\ 3]\cap[-3\ ,\ 7]\ $ آنگاه $\ a+3b\ $ کدام است ؟ 
\fourj{$0$}{$8$}{$-8$}{$\dis\frac{8}{3}$}
\def\Aa{گزینه 2}

\item مینیمم مجموعهٔ $A=\left\{\left\lfloor\dis\frac32\sin x\right\rfloor\;:\;x\in\R\right\}$ کدام است؟
\fourj 
{۲-}{۱-}{صفر}{مجموعهٔ $A$ دارای عضو مینیمم نیست.}

\end{enumerate}
\newpage 
\subsection{پاسخنــامه }
\begin{multicols}{5}
\begin{enumerate}


\item[\ref{1})] \Aa \item[\ref{2})] گزینه 
\item[\ref{3})] گزینه \item[\ref{4})] گزینه 
\item[\ref{5})] گزینه \item[\ref{6})] گزینه

\end{enumerate}

\end{multicols}

\end{document}
