Subversion Repositories wimsdev

Rev

Rev 14333 | Rev 15963 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 14333 Rev 14993
Line 30... Line 30...
30 
      !endif
 30 
      !endif
31 
    !next u
 31 
    !next u
32 
    mav=0
 32 
    mav=0
33 
    !for i=1 to $gcnt
 33 
    !for i=1 to $gcnt
34 
      g_$i=!item $i of $teacher
 34 
      g_$i=!item $i of $teacher
- 
 
 35 
      !if $(g_$i)!=$empty
35 
      mav=$[$mav+($(g_$i))*($(w$i))]
 36 
        mav=$[$mav+($(g_$i))*($(w$i))]
- 
 
 37 
      !endif
36 
    !next i
 38 
    !next i
37 
     mav=$[rint(100*$mav/$mwtot)/100]
 39 
     mav=$[rint(100*$mav/$mwtot)/100]
38 
  !else
 40 
  !else
39 
    mav=0
 41 
    mav=0
40 
  !endif
 42 
  !endif