заполнить массив из 10 элементов от 1 до 100 и найти их среднее арифметическое

//PascalABC.NET (версия 3.1, сборка 1196 от 09.03.2016)begin  var  a := ArrRandom(10, 1, 100);  a.Println;   println(a.Average);end.