Люди подскажите, можно ли наполнить одномерный массив случайными числами в диапазоне от -20 до +20, если да, то как?

Как просто наполнить массив случайными числами я вроди понял

for i:=1 to N do A[i]:=RANDOM(max_value); {Заполнение массива случ. числами}

, а вот именно в диапазоне от -20 до +20 не получается.

randomize;

for i := 1 to n do
 x[i] := Random(41) - 20;