Заполнить массив из 10 элементов от 1 до 100 и найти их среднее арифметическое
//PascalABC.NET (версия 3.1, сборка 1196 от 09.03.2016) begin var a := ArrRandom(10, 1, 100); a.Println; println(a.Average); end.