Заполнить массив из 15ти элементов случайным образом целыми числами лежащими в отрезке (5,50).Вывести значения элементов

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