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