version 1.54, 2002/08/27 02:25:11
|
version 1.55, 2002/08/28 14:22:15
|
Line 169 sub end_numericalresponse {
|
Line 169 sub end_numericalresponse {
|
if ($target eq 'web') { |
if ($target eq 'web') { |
$result="<br />The computer got "; |
$result="<br />The computer got "; |
} elsif ($target eq 'tex') { |
} elsif ($target eq 'tex') { |
$result='\vskip 0 mm The computer got '; |
$result='\vskip 0 mm The computer got \verb|'; |
} |
} |
for (my $i=0; $i <= $#answers; $i++) { |
for (my $i=0; $i <= $#answers; $i++) { |
my $answer=$answers[$i]; |
my $answer=$answers[$i]; |
Line 191 sub end_numericalresponse {
|
Line 191 sub end_numericalresponse {
|
if ($target eq 'web') { |
if ($target eq 'web') { |
$result.=" $unit.<br></br>"; |
$result.=" $unit.<br></br>"; |
} elsif ($target eq 'tex') { |
} elsif ($target eq 'tex') { |
$result.="\$ $unit \$.\\vskip 0 mm "; |
$result.=" $unit.| \\vskip 0 mm "; |
} |
} |
} |
} |
} elsif ($target eq 'edit') { |
} elsif ($target eq 'edit') { |