Сформировать 15элементный массив случайным образом

// Пример программки на языке Паскаль.

var
   i : integer;                               // объявляем переменную целочисленного типа.
   arr : array [1..15] of integer;    // объявляем массив.
Begin
   writeln (Содержимое массива:);       // вывод строчки на экран.
      for i:= 1 to 15 do                           // начало цикла.
        begin
           arr[i] := random(-1000,1000); // наполняем элемент массива числом от -1000 до 1000.
           write(arr[i], );                       //вывод строчки на экран.
        end;
End.