Создать массив А [1..8] с помощью генератора с элементами от -10 до 10 и вывести его на экран.

var a:array [1..8] of integer;
i:integer;
begin
randomize;
for i:=1 to 8 do
begin
a[i]:=random(20)-10;
writeln(a[i]);
end;
end.