Заполните массив на 50 элементов целыми значениями, лежащими в диапазоне от -22 до 15, и организуйте вывод элементов

var   arr : array[0..50] of integer;// объявляем массив.   i :integer; // объявляем переменную целочисленного типа. begin  for i := 1 to 50 do // начало цикла.    begin     arr[i] := random(-22,15); // заполняем элемент массива случайным числом от -22 до 15.     if ((i >=14) and (i <= 34)) then // если индекс элемента от 14 до 34 выводим его на экран.     write(arr[i],\' \');     end; end.