Question

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

Answer 1

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