Question

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

Answer 1

// PascalABC.NET 3.1, сборка 1195 от 09.03.2016
begin
  var a:=ArrRandom(10,1,100); a.Println;
  Writeln('Ср.арифм.=',a.Average)
end.

Тестовое решение:
29 50 22 89 21 94 93 83 45 89
Ср.арифм.=61.5

Answer 2

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

Answer 3

Чтобы заполнить массив из 10 элементов от 1 до 100 и найти их среднее арифметическое, можно использовать следующий код на языке программирования Python:

# Создаем пустой массив
arr = []

# Заполняем массив числами от 1 до 100
for i in range(1, 101):
    arr.append(i)

# Находим сумму всех элементов массива
sum = 0
for num in arr:
    sum += num

# Находим среднее арифметическое
average = sum / len(arr)

# Выводим результат
print("Среднее арифметическое:", average)

Результатом выполнения программы будет вывод среднего арифметического чисел от 1 до 100, которое будет равно 50.5.