Дан массив x[7] - целые числа. найти среднее арифметические

//PascalABC.NET 3.1

begin
  var a := ArrRandomInteger(7); a.Println;
  WriteLn('Среднее арифметическое: ', a.Average);
end.