Имеется числовой массив состоящий из 15 частей. Вывести на экран среднее

var
    i,sum : integer;                     // объявляем переменные целочисленного типа.
    arr : array [1..15] of integer; // объявляем массив.
Begin
   writeln(Введите 15 чисел для заполнения массива:);    // вывод строчки на экран.
   for i:= 1 to 15 do             // начало цикла.
      begin
          readln(arr[i]);              // считываем элемент массива.
          sum := sum + arr[i];   // считаем сумму частей.
      end;
  writeln(Среднее арифметическое частей массива: , round(sum / 15, 2)); // вывод ответа.
End.