Question

Составить программу которая в массиве а 12 находит среднее арифметическое

Answer 1

PascalABC.NET 3.3.5, сборка 1659 от 09.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  var a:=ArrRandom(12,-50,50); a.Println;
  Writeln('Среднее арифметическое: ',a.Average)
end.

Пример
30 34 4 -13 35 2 31 -23 -30 44 4 -37
Среднее арифметическое: 6.75

Answer 2

Var
a:array [1..12] of integer;
i,s:integer;
begin
for i:= 1 to 12 do
a[i]:= Random(10);
writeln(a);
for i:=1 to 12 do s:=s+a[i];
writeln('Среднее арифметическое всех элементов массива равно ',s/12:0:3)
end.

Пример:
[7,8,9,8,4,5,7,6,9,5,6,1]
Среднее арифметическое всех элементов массива равно 6.250

Answer 3

Для написания программы нахождения среднего арифметического элементов массива, нужно выполнить следующие шаги:

1. Создать массив с 12 элементами.
2. Заполнить массив числами.
3. Найти сумму всех элементов массива.
4. Разделить сумму на количество элементов массива (в данном случае, 12).

Вот пример программы на языке Python:

pythonCopy code
# Создаем массив
arr = [0] * 12

# Заполняем массив числами (можете ввести свои числа)
for i in range(12):
    arr[i] = int(input(f"Введите число {i + 1}: "))

# Находим сумму всех элементов массива
sum_arr = sum(arr)

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

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

Программа попросит вас ввести 12 чисел, затем вычислит и выведет среднее арифметическое этих чисел.