Difference between revisions of "MultipleChoiceRadio1"
Jump to navigation
Jump to search
Paultpearson (talk | contribs) (Add link to PGML version in OPL) |
|||
| Line 77: | Line 77: | ||
<b>Setup:</b> |
<b>Setup:</b> |
||
To create a radio object, use <code>$radio = RadioButtons([choices,...],correct,options);</code> |
To create a radio object, use <code>$radio = RadioButtons([choices,...],correct,options);</code> |
||
| − | For all options, see [http://webwork.maa.org/pod/ |
+ | For all options, see [http://webwork.maa.org/pod/pg/macros/parserRadioButtons.html parserRadioButtons.pl] The context is not really necessary, but multiple choice questions are often follow-up questions, so we leave it in. |
</p> |
</p> |
||
</td> |
</td> |
||
Revision as of 17:07, 7 April 2021
Multiple Choice Question with Radio Buttons
This PG code shows how to write a multiple choice question in which all of the options are displayed to the student and the student can only choose one correct answer (it uses radio buttons).
- File location in OPL: FortLewis/Authoring/Templates/Misc/MultipleChoiceRadio1.pg
- PGML location in OPL: FortLewis/Authoring/Templates/Misc/MultipleChoiceRadio1_PGML.pg
| PG problem file | Explanation |
|---|---|
|
Problem tagging: |
|
DOCUMENT(); loadMacros( "PGstandard.pl", "MathObjects.pl", "parserRadioButtons.pl", ); TEXT(beginproblem()); |
Initialization:
We need |
Context("Numeric");
$radio = RadioButtons(
["Red","Blue","Green","None of these"],
"Blue", # correct answer
last => ["None of these"], # can be a list
);
|
Setup:
To create a radio object, use |
Context()->texStrings;
BEGIN_TEXT
My favorite color is
$BR
$BR
\{ $radio->buttons() \}
END_TEXT
Context()->normalStrings;
|
Main Text: |
install_problem_grader(~~&std_problem_grader); $showPartialCorrectAnswers = 0; ANS( $radio->cmp() ); |
Answer Evaluation: We withhold feedback by choosing not to show partially correct answers. We use the standard problem grader, which gives full credit or no credit. For other graders, see weighted graders |
Context()->texStrings;
BEGIN_SOLUTION
${PAR}SOLUTION:$PAR
The correct answer is \{ $radio->correct_ans() \}
END_SOLUTION
Context()->normalStrings;
COMMENT('MathObject version.');
ENDDOCUMENT();
|
Solution: |
