Создать массив а, состоящий из 10 элементов, проинициализируйте его числами 10, 20, 30, 100. вывести массив на экран. найти среднее арифметическое значений массива, вывести на экран. увеличить первый, пятый и десятый элементы массива на 5.

// PascalABC.NET 3.1, сборка 1179 от 29.02.2016
begin
  var a:=Range(10,100,10).ToArray; a.Println;
  Writeln('Ср.арифм.=',a.Average);
  a[0]+=5; a[4]+=5; a[9]+=5;
  a.Println
end.

Тестовое решение:
10 20 30 40 50 60 70 80 90 100
Ср.арифм.=55
15 20 30 40 55 60 70 80 90 105