Заполнить массив из 10 целых элементов случайными числами из диапазона от -5 до 5. Очень...

Question

Заполнить массив из 10 целых элементов случайными числами из диапазона от -5 до 5.
Очень срочно(паскаль)

Answer 1

1)Вариант:

begin
  var ar:=arrrandom(10, -5, 5);
  //ar.Println;
end. 

2)Вариант:

var ar: array[1..10]of integer;
  begin
  for var i := 1 to 10 do ar[i] := random(-5, 5);
  //for var i := 1 to 10 do write(ar[i],' ');
end.