Сформировать одновременный массив из 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