以下代码，如何做个循环执行一次产生15个数？

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;