Cho khai báo mảng và đoạn chương trình như sau:
Var
a : array[0..250] of integer;
n,i:integer;
Begin
randomize;
write(‘Nhap so n=’); readln(n);
for i := 1 to 250 do
A[i]:= random(250) – random(250);
Readln;
End.
Đoạn chương trình trên thực hiện công việc gì dưới đây?