Сформировать массив из случайных целых чисел из промежутка от -3 до 3 элементы массива вывести в строчку

var  i:Integer;  A:Array[1..10] of Integer;  begin  Randomize;  for i:=1 to 10 do  A[ i ]:=Random(100);  end.  Только не понял - ввод с клавиатуры или заполнить случайными числами?