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.