Сформировать одновременный массив из 10 элементов с датчика случайных величин на интервале [-20,5]

Const
  n = 10;

var
  x: array[1..n] of integer;
  i: integer;

begin
  Randomize;
  Write('Элементы массива: ');
  for i := 1 to n do
  begin
    x[i] := Random(26) - 20;
    Write(x[i]:4)
  end
end.

Тестовое решение:
Элементы массива:   -9   3   0 -16 -11  -2 -20  -5   5 -18