编写一个函数计算从1加到N的结果

编写一个函数计算从1加到N的结果

问题补充说明：答案是:<%function countN(n) dim i,c c=0 for i=1 to n c=c+1 next countN=c end function s=1000 response.write "从 1 加到 " & s & " 的结果是: " & countN(s)%>问题是: 这里的 S=1000 是什么?有人能给解释一下吗? 整个过程简单解释一下

<%

functioncountN(n)//定义countN(n)函数

dimi,c

c=0//变量c初值为0

fori=1ton//当i为1到n时

c=c+1//这里好像写错了，应该是c=c+i;

next

cou被粒敌助办精铁杨烧ntN=c//最后结果为c

endfunction

s=1000//令s=1000

response.write"从1加到"&s&"的结果是:"&countN(s)

%>//输出从1加到1停却研务搞频社化求仍000的值是:countN(1000)还固落克宁;