Question

Задан массив из 80 элементов,заполненный с клавиатуры.Найти и вывести среднее значение отрицательных элементов кратных 3. (9 класс) Очень надеюсь,что поможете

Answer 1

===== PascalABC.NET =====

begin

 var a := ReadArrInteger(80);

 a.Where(p -> (p < 0) and (p mod 3 = 0)).Average.Println

end.

Answer 2

Конечно, я помогу вам с этой задачей! Вот пример программы на языке Python, которая решает задачу:

pythonCopy code
# Создаем пустой массив для хранения введенных чисел
numbers = []

# Вводим числа с клавиатуры
for i in range(80):
    number = int(input("Введите число: "))
    numbers.append(number)

# Инициализируем переменные для подсчета суммы и количества отрицательных элементов, кратных 3
sum_negative_multiples_of_3 = 0
count_negative_multiples_of_3 = 0

# Проходим по всем элементам массива
for number in numbers:
    if number < 0 and number % 3 == 0:  # Проверяем, является ли число отрицательным и кратным 3
        sum_negative_multiples_of_3 += number
        count_negative_multiples_of_3 += 1

# Вычисляем среднее значение
if count_negative_multiples_of_3 != 0:
    average = sum_negative_multiples_of_3 / count_negative_multiples_of_3
    print("Среднее значение отрицательных элементов, кратных 3:", average)
else:
    print("В массиве нет отрицательных элементов, кратных 3.")

Вы можете скопировать этот код и выполнить его на своем компьютере или в среде разработки Python, чтобы решить данную задачу. Программа позволяет ввести 80 чисел с клавиатуры, а затем находит и выводит среднее значение отрицательных элементов, кратных 3. Если в массиве нет таких элементов, программа выведет соответствующее сообщение.

Надеюсь, это поможет вам! Если у вас возникнут еще вопросы, не стесняйтесь задавать.