Quero mostrar as respostas no final da página do exame (escolha múltipla). Tenho um banco de perguntas e respostas (presume-se sempre que a primeira resposta do banco seja a escolha certa) e algumas macros para embaralhar as perguntas e suas respostas. Todos os arquivos estão anexados (aqui). A saída também é mostrada abaixo. o problema é que não consigo mostrar as respostas corretas no final da página.
Responder1
Existem vários pacotes para ajudá-lo a criar exames e questionários. Não estou muito familiarizado com eles porque construí o meu próprio. Aqui está uma versão muito simplificada do que eu uso:
\documentclass{article}
\makeatletter
\newcounter{ae@prob@cnt}
\let\ae@answer@key\relax
\newcommand\problem[1][a]{%%
\stepcounter{ae@prob@cnt}%%
\edef\ae@tmp{\theae@prob@cnt/#1}%%
\ifx\relax\ae@answer@key
\edef\ae@answer@key{\ae@tmp}%%
\else
\edef\ae@answer@key{\ae@answer@key,\ae@tmp}%%
\fi
Problem \theae@prob@cnt\hspace{1em}%%%
}
\newcommand\presentanswerkey{%%
\expandafter\ae@present@answers\ae@answer@key,\relax\@nil}
\def\ae@present@answers#1,#2\@nil{%%
\def\ae@continue{}%%
\ae@parse@pair#1\@nil
\ifx\relax#2
\else
\def\ae@continue{\ae@present@answers#2\@nil}%%
\fi
\ae@continue}
\def\ae@parse@pair#1/#2\@nil{%%
#1\hspace{0.25cm}#2\par}
\makeatother
\begin{document}
\problem[a] This is a question
\problem[b] This is another question
\problem[d] This is the penultimate question
\problem[c] My favorite question.
\presentanswerkey
\end{document}
ATUALIZAR
Aqui está uma versão modificada do acima:
\makeatletter
\let\ae@answer@key\relax
\newcommand\buildanswerkey[2]{%%
\typeout{===>#1:#2}%%
\edef\ae@tmp{#1/#2}%%
\ifx\relax\ae@answer@key
\xdef\ae@answer@key{\ae@tmp}%%
\else
\xdef\ae@answer@key{\ae@answer@key,\ae@tmp}%%
\fi}
\newcommand\presentanswerkey{%%
\typeout{===>\detokenize\expandafter{\ae@answer@key}}%%
\expandafter\ae@present@answers\ae@answer@key,\relax\@nil}
\def\ae@present@answers#1,#2\@nil{%%
\def\ae@continue{}%%
\ae@parse@pair#1\@nil
\ifx\relax#2
\else
\def\ae@continue{\ae@present@answers#2\@nil}%%
\fi
\ae@continue}
\def\ae@parse@pair#1/#2\@nil{%%
#1\hspace{0.25cm}#2\par}
\makeatother
Salve-o em um arquivo chamado buildanswerkey.texe carregue-o em seu commandsPerm.texarquivo.
Em commandsPerm.tex, reescrevi algumas das linhas da seguinte maneira:
%%-----------------------------------------
\pgfmathrandomitemwithoutreplacement\j{tmp}
\sbox\answera{\ifx\j\correctAnswer * \expandafter\buildanswerkey\expandafter{\thequestion}{a}\fi\ifcase\j\relax\or#1\or#2\or#3\or#4\fi}%
\ifx\j\javab \questionhaspoints{\thequestion = 1} \fi
%%-----------------------------------------
\pgfmathrandomitemwithoutreplacement\j{tmp}
\sbox\answerb{\ifx\j\correctAnswer * \expandafter\buildanswerkey\expandafter{\thequestion}{b}\fi\ifcase\j\relax\or#1\or#2\or#3\or#4\fi}%
\ifx\j\javab \questionhaspoints{\thequestion = 2} \fi
%%-----------------------------------------
\pgfmathrandomitemwithoutreplacement\j{tmp}
\sbox\answerc{\ifx\j\correctAnswer * \expandafter\buildanswerkey\expandafter{\thequestion}{c}\fi\ifcase\j\relax\or#1\or#2\or#3\or#4\fi}%
\ifx\j\javab \questionhaspoints{\thequestion = 3} \fi
%%-----------------------------------------
\pgfmathrandomitemwithoutreplacement\j{tmp}
\sbox\answerd{\ifx\j\correctAnswer * \expandafter\buildanswerkey\expandafter{\thequestion}{d}\fi\ifcase\j\relax\or#1\or#2\or#3\or#4\fi}%
\ifx\j\javab \questionhaspoints{\thequestion = 4} \fi
Então, ao compilar seu arquivo, você receberá uma chave de resposta. Não me preocupei em descobrir como você pretendia criar sua chave de resposta, mas ligando \presentanswerkeyantes de sair do mcquestionsambiente, você obterá uma chave correta:
