\usepackage{multicol,color}
%\setlength{\textwidth}{16cm}
\definecolor{mycolor}{rgb}{0,0.6,1}
\newcounter{question}
\newcommand{\question}[1]{\noindent\stepcounter{question}\textcolor{mycolor}{\thequestion.} #1}
\newsavebox{\answera}
\newsavebox{\answerb}
\newsavebox{\answerc}
\newsavebox{\answerd}
\newcommand{\answer}[4]{%
	\sbox\answera{#1}%
	\sbox\answerb{#2}%
	\sbox\answerc{#3}%
	\sbox\answerd{#4}%
	\ifdim\wd\answera<0.165\textwidth%
	\ifdim\wd\answerb<0.165\textwidth%
	\ifdim\wd\answerc<0.165\textwidth%
	\ifdim\wd\answerd<0.165\textwidth%
	\begin{multicols}{4}
		\begin{itemize}
			
			\item[\textcolor{mycolor}{4)}] \usebox{\answerd}
			\item[\textcolor{mycolor}{3)}] \usebox{\answerc}
			\item[\textcolor{mycolor}{2)}] \usebox{\answerb}
			\item[\textcolor{mycolor}{1)}] \usebox{\answera}
		\end{itemize}
	\end{multicols}
	\else%
	\ifdim\wd\answera<0.4\textwidth%
	\ifdim\wd\answerb<0.4\textwidth%
	\ifdim\wd\answerc<0.4\textwidth%
	\ifdim\wd\answerd<0.4\textwidth%
	\begin{multicols}{2}
		\begin{itemize}
	\item[\textcolor{mycolor}{4)}] \usebox{\answerd}
\item[\textcolor{mycolor}{3)}] \usebox{\answerc}
\item[\textcolor{mycolor}{2)}] \usebox{\answerb}
\item[\textcolor{mycolor}{1)}] \usebox{\answera}
		\end{itemize}
	\end{multicols}
	\else
	\begin{itemize}
\item[\textcolor{mycolor}{4)}] #4
\item[\textcolor{mycolor}{3)}] #3
\item[\textcolor{mycolor}{2)}] #2
\item[\textcolor{mycolor}{1)}] #1
	\end{itemize}
	\fi
	\else
	\begin{itemize}
\item[\textcolor{mycolor}{4)}] #4
\item[\textcolor{mycolor}{3)}] #3
\item[\textcolor{mycolor}{2)}] #2
\item[\textcolor{mycolor}{1)}] #1
	\end{itemize}
	\fi
	\else
	\begin{itemize}
\item[\textcolor{mycolor}{4)}] #4
\item[\textcolor{mycolor}{3)}] #3
\item[\textcolor{mycolor}{2)}] #2
\item[\textcolor{mycolor}{1)}] #1
	\end{itemize}
	\fi
	\else
	\begin{itemize}
\item[\textcolor{mycolor}{4)}] #4
\item[\textcolor{mycolor}{3)}] #3
\item[\textcolor{mycolor}{2)}] #2
\item[\textcolor{mycolor}{1)}] #1
	\end{itemize}
	\fi\fi
	\else
	\ifdim\wd\answera<0.4\textwidth%
	\ifdim\wd\answerb<0.4\textwidth%
	\ifdim\wd\answerc<0.4\textwidth%
	\ifdim\wd\answerd<0.4\textwidth%
	\begin{multicols}{2}
		\begin{itemize}
	\item[\textcolor{mycolor}{4)}] \usebox{\answerd}
\item[\textcolor{mycolor}{3)}] \usebox{\answerc}
\item[\textcolor{mycolor}{2)}] \usebox{\answerb}
\item[\textcolor{mycolor}{1)}] \usebox{\answera}
		\end{itemize}
	\end{multicols}
	\else
	\begin{itemize}
\item[\textcolor{mycolor}{4)}] #4
\item[\textcolor{mycolor}{3)}] #3
\item[\textcolor{mycolor}{2)}] #2
\item[\textcolor{mycolor}{1)}] #1
	\end{itemize}
	\fi
	\else
	\begin{itemize}
\item[\textcolor{mycolor}{4)}] #4
\item[\textcolor{mycolor}{3)}] #3
\item[\textcolor{mycolor}{2)}] #2
\item[\textcolor{mycolor}{1)}] #1
	\end{itemize}
	\fi
	\else
	\begin{itemize}
\item[\textcolor{mycolor}{4)}] #4
\item[\textcolor{mycolor}{3)}] #3
\item[\textcolor{mycolor}{2)}] #2
\item[\textcolor{mycolor}{1)}] #1
	\end{itemize}
	\fi
	\else
	\begin{itemize}
\item[\textcolor{mycolor}{4)}] #4
\item[\textcolor{mycolor}{3)}] #3
\item[\textcolor{mycolor}{2)}] #2
\item[\textcolor{mycolor}{1)}] #1
	\end{itemize}
	\fi\fi
	\else
	\ifdim\wd\answera<0.4\textwidth%
	\ifdim\wd\answerb<0.4\textwidth%
	\ifdim\wd\answerc<0.4\textwidth%
	\ifdim\wd\answerd<0.4\textwidth%
	\begin{multicols}{2}
		\begin{itemize}
	\item[\textcolor{mycolor}{4)}] \usebox{\answerd}
\item[\textcolor{mycolor}{3)}] \usebox{\answerc}
\item[\textcolor{mycolor}{2)}] \usebox{\answerb}
\item[\textcolor{mycolor}{1)}] \usebox{\answera}
		\end{itemize}
	\end{multicols}
	\else
	\begin{itemize}
\item[\textcolor{mycolor}{4)}] #4
\item[\textcolor{mycolor}{3)}] #3
\item[\textcolor{mycolor}{2)}] #2
\item[\textcolor{mycolor}{1)}] #1
	\end{itemize}
	\fi
	\else
	\begin{itemize}
\item[\textcolor{mycolor}{4)}] #4
\item[\textcolor{mycolor}{3)}] #3
\item[\textcolor{mycolor}{2)}] #2
\item[\textcolor{mycolor}{1)}] #1
	\end{itemize}
	\fi
	\else
	\begin{itemize}
\item[\textcolor{mycolor}{4)}] #4
\item[\textcolor{mycolor}{3)}] #3
\item[\textcolor{mycolor}{2)}] #2
\item[\textcolor{mycolor}{1)}] #1
	\end{itemize}
	\fi
	\else
	\begin{itemize}
\item[\textcolor{mycolor}{4)}] #4
\item[\textcolor{mycolor}{3)}] #3
\item[\textcolor{mycolor}{2)}] #2
\item[\textcolor{mycolor}{1)}] #1
	\end{itemize}
	\fi\fi
	\else
	\ifdim\wd\answera<0.4\textwidth%
	\ifdim\wd\answerb<0.4\textwidth%
	\ifdim\wd\answerc<0.4\textwidth%
	\ifdim\wd\answerd<0.4\textwidth%
	\begin{multicols}{2}
		\begin{itemize}
	\item[\textcolor{mycolor}{4)}] \usebox{\answerd}
\item[\textcolor{mycolor}{3)}] \usebox{\answerc}
\item[\textcolor{mycolor}{2)}] \usebox{\answerb}
\item[\textcolor{mycolor}{1)}] \usebox{\answera}
		\end{itemize}
	\end{multicols}
	\else
	\begin{itemize}
\item[\textcolor{mycolor}{4)}] #4
\item[\textcolor{mycolor}{3)}] #3
\item[\textcolor{mycolor}{2)}] #2
\item[\textcolor{mycolor}{1)}] #1
	\end{itemize}
	\fi
	\else
	\begin{itemize}
\item[\textcolor{mycolor}{4)}] #4
\item[\textcolor{mycolor}{3)}] #3
\item[\textcolor{mycolor}{2)}] #2
\item[\textcolor{mycolor}{1)}] #1
	\end{itemize}
	\fi
	\else
	\begin{itemize}
\item[\textcolor{mycolor}{4)}] #4
\item[\textcolor{mycolor}{3)}] #3
\item[\textcolor{mycolor}{2)}] #2
\item[\textcolor{mycolor}{1)}] #1
	\end{itemize}
	\fi
	\else
	\begin{itemize}
\item[\textcolor{mycolor}{4)}] #4
\item[\textcolor{mycolor}{3)}] #3
\item[\textcolor{mycolor}{2)}] #2
\item[\textcolor{mycolor}{1)}] #1
	\end{itemize}
	\fi\fi
}