yukarıda verdiğim kodda mesela 1. quizi girdiğinizde 2.yi girmezseniz 3. yü girerseniz 1 ile 3 ün ortalamsını almıyor. exit for dediği için döngüyü devam ettirmiyor. bende şöle değiştirdim...
<%
QuizSayisi = 5
Toplam = 0
sayi = 0
For i = 1 To QuizSayisi
if CInt(Request.Form("quiz"& i)) <> 0 Then
Toplam = Toplam + CInt(Request.Form("quiz"& i))
sayi = sayi + 1
End if
Next
bol = Toplam / sayi
Response.Write "Ortalama: "& bol

%>