
Найти среднее арифметическое всех элементов массива, которые делятся на 5


Ответы на вопрос

const n=10;
var a:array [1..n] of integer;
i,s,k:integer;
begin
write('Массив: ');
for i:= 1 to n do
begin
a[i]:=random (16);
write (a[i],' ');
if a[i] mod 5 = 0 then
begin
s:=s+a[i];
k:=k+1
end
end;
writeln;
if k<>0 then writeln('Среднее арифметическое элементов массива, которые делятся на 5, равно: ',s/k:0:3)
else writeln ('Элементов массива, которые делятся на 5, нет.')
end.



Для нахождения среднего арифметического всех элементов массива, которые делятся на 5, необходимо выполнить следующие шаги:
- Проход по всем элементам массива.
- Выборка только тех элементов, которые делятся на 5 без остатка.
- Вычисление суммы всех выбранных элементов.
- Подсчет количества выбранных элементов.
- Вычисление среднего арифметического путем деления суммы на количество.
Предположим, у нас есть массив arr
, содержащий элементы, и мы хотим найти среднее арифметическое элементов, которые делятся на 5. Вот пример кода на языке Python:
pythondef average_of_elements_divisible_by_5(arr):
count = 0
total_sum = 0
for num in arr:
if num % 5 == 0:
total_sum += num
count += 1
if count == 0:
return 0 # Избегаем деления на 0, если нет элементов, делящихся на 5
average = total_sum / count
return average
# Пример использования функции:
array = [10, 5, 15, 7, 25, 30]
result = average_of_elements_divisible_by_5(array)
print("Среднее арифметическое элементов, делящихся на 5:", result)
При выполнении данного кода для массива [10, 5, 15, 7, 25, 30]
будет найдено среднее арифметическое всех элементов, которые делятся на 5, и результат будет равен 15.0
.


Похожие вопросы


Топ вопросов за вчера в категории Информатика







Последние заданные вопросы в категории Информатика
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili