var
a,b,c:integer;
begin
randomize;
a:=random(50)-50 ;
b:=random(100);
c:=a+b;
label1.caption:=inttostr(c);
end;
var
a,b,c:integer;
begin
randomize;
a:=random(50)-50 ;
b:=random(100);
c:=a+b;
label1.caption:=inttostr(c);
end;
看代码像delphi代码?用for这样写
for I := 0 to 15 do
begin
// 产生随机数代码。
end;