Untitled

<html>
<body>
<% dim i,n,s

n=Request.Form("n")

n=Cdbl(n)


%>
<form method="post" action="zadatak 3.asp">
n= <input type="text" name="n"></br>
<input type="submit" value="Izracunaj">
</form>
<%

for i=0 to n

s=s+i

Next

Response.Write("Aritmeticka sredina je" & s/n & "</br>")

%>

</body>
</html>