苦寒竹的主页

高斯等差数列：从1加到100：
1、1+2+3+……+N
<%
function GetSum(Num)
dim a : a = 0
for i = 1 to Num
a = a + i
next
GetSum = a
End function
%>
<%=GetSum(100)%>

2、(1+N)*N/2:
<%
function a(N)
a=(1+N)*N/2
end function
response.write a(100)
%>
<?php
error_reporting(E_ERROR | E_WARNING | E_PARSE);
for($i==1;$i<101;$i++)
{
$j=$j+$i;}
echo $j;
function he($n)
{
$n=(1+$n)*$n/2;
return $n;
}
echo he(100)
?>

电影下载
论坛