Составить программу в pascal, которая формирует одномерный массив случайным образом, случайные числа должны принадлежать отрезку [-4; 3].

Var a:array[1..10] of integer;   
i:integer;begin 
for i:=1 to 10 do  
begin     
a[i]:=-4+random(8);
write(a[i],' ');
end;
end.