编写一个程序,用于输出10个自然数的平方

var i,j:integer;
begin
for i:=1 to 10 do
begin
j:=StrToInt(Edit1.text);
j:=Random(j);
if j<>0 then
begin
memo1.Lines.add(IntToStr(j)+'*'+IntToStr(j)+'='+IntToStr(j*j)+ #13) ;
end;

end;
end;

用ASP写就最好用了
首先定义一个常量
COUNST
再把DIM一个随机数..
就好了

for ( int i = 1 ; i <= 10 ; i ++ )
{
Response.Write( i * i) ;
}