Сформировать 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.