Задайте массив из 10 элементов с помощью датчика случайных чисел лежащих промежутке от -20 до 18

const     max_v = 10;    m1 = -20;    m2 = 18;    var v:array [1..max_v] of integer;    i:byte;begin  randomize();  for i:=1 to max_v do     v[i]:=random(m1,m2);end.