Question

найти среднее арифметическое элементов последовательности, превосходящих число 12. массив задан датчиком случайных чисел на интерваде [-44,35]. Размер массива -21 элемент

Answer 1

Const N = 21;
Var
   A:array[1..N] of integer;
   i,k:integer;
   S:real;
Begin
randomize;
S:=0;
k:=0;
Write('Исходный массив: ');
For i:= 1 to N do
    Begin
    A[i]:=random(80)-44;
    Write(A[i],' ');
    if A[i]<=12 then
       Begin
       S:=S+A[i];
       k:=k+1
       End;
    End;
WriteLn;
WriteLn('Sr = ',S/k)
End.

Answer 2

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

1. Сгенерировать массив случайных чисел из интервала [-44, 35] длиной 21 элемент.

2. Пройтись по всем элементам массива и найти те, которые больше 12.

3. Посчитать сумму всех найденных элементов.

4. Разделить сумму на количество найденных элементов, чтобы получить среднее арифметическое.

Вот как это может выглядеть на Python:

pythonCopy code
import random

# Генерация массива случайных чисел
array = [random.randint(-44, 35) for _ in range(21)]

# Поиск элементов больше 12 и вычисление среднего арифметического
count = 0
sum = 0

for num in array:
    if num > 12:
        count += 1
        sum += num

if count > 0:
    mean = sum / count
    print("Среднее арифметическое элементов, превосходящих число 12:", mean)
else:
    print("В массиве нет элементов, превосходящих число 12.")

Пример вывода:

yamlCopy code
Среднее арифметическое элементов, превосходящих число 12: 21.5