
Дан массив вещественных чисел. найти среднее арифметическое неотрицательных элементов массива.


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

const n=10;
var a: array[1..n] of real;
sum,k: real;
i: integer;
begin
sum:=0;
k:=0;
for i:=1 to n do
begin
readln(a[i]);
if a[i]>0 then begin
k:=k+1;
sum:=sum+a[i];
end;
end;
write(sum/k);
end.



Для нахождения среднего арифметического неотрицательных элементов в массиве вещественных чисел, нужно выполнить следующие шаги:
1. Создайте пустую переменную `sum` и установите ее значение равным нулю. 2. Создайте переменную `count` и установите ее значение равным нулю. Эта переменная будет использоваться для подсчета количества неотрицательных элементов в массиве. 3. Пройдитесь по каждому элементу в массиве. 4. Если элемент больше или равен нулю, добавьте его к переменной `sum` и увеличьте значение переменной `count` на единицу. 5. После завершения цикла, вычислите среднее арифметическое, разделив сумму всех неотрицательных элементов на их количество. 6. Верните полученное значение среднего арифметического.
Ниже приведен пример кода на языке Python, который реализует этот алгоритм:
```python def find_average(arr): sum = 0 count = 0
for num in arr: if num >= 0: sum += num count += 1
if count > 0: average = sum / count return average else: return None ```
Вы можете вызвать эту функцию, передав массив вещественных чисел в качестве аргумента. Она вернет среднее арифметическое неотрицательных элементов массива.
Например:
```python arr = [1.5, -2.3, 4.7, -0.9, 3.2, 0.8] average = find_average(arr) print("Среднее арифметическое неотрицательных элементов:", average) ```
Обратите внимание, что в данном примере в качестве ответа будет выведено среднее арифметическое только неотрицательных элементов массива.
Надеюсь, это поможет! Если у вас возникнут еще вопросы, не стесняйтесь задавать.


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