% 定义试题环境
\newenvironment{questions}[1][]{
\@tfor \@opt :=#1\do
{\if\@opt s\global\@showscoretrue\fi
\if\@opt t\global\@showskiptrue\fi
\if\@opt p\global\@showparentrue\fi}
\if@list
\list{\arabic{Question}.}{\setlength{\leftmargin}{0pt}}
\else
\par \begingroup \par
\fi
}{
\if@list
\endlist
\else
\par \endgroup \par
\fi
\global\@showscorefalse
\global\@showskipfalse
\global\@showparenfalse
}
