|
version 1.574.2.5, 2009/12/27 01:51:07
|
version 1.574.2.6, 2009/12/27 02:05:40
|
|
Line 9050 ENDHEADER
|
Line 9050 ENDHEADER
|
| my $sum=0; |
my $sum=0; |
| my $realnumber=$number; |
my $realnumber=$number; |
| for (my $i=0;$i<$number;$i++) { |
for (my $i=0;$i<$number;$i++) { |
| if ($answer[$i]) { |
if ($correct[$i] eq '-') { |
| |
$realnumber--; |
| |
} elsif ($answer[$i]) { |
| if ($gradingmechanism eq 'attendance') { |
if ($gradingmechanism eq 'attendance') { |
| $sum+=$pcorrect; |
$sum+=$pcorrect; |
| } elsif ($answer[$i] eq '*') { |
} elsif ($correct[$i] eq '*') { |
| $sum+=$pcorrect; |
$sum+=$pcorrect; |
| } elsif ($answer[$i] eq '-') { |
|
| $realnumber--; |
|
| } else { |
} else { |
| if ($answer[$i] eq $correct[$i]) { |
if ($answer[$i] eq $correct[$i]) { |
| $sum+=$pcorrect; |
$sum+=$pcorrect; |
![[BACK]](/icons/back.gif){kind=icon}
Return to grades.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / homework