Question

Программа, которая будет находить среднее арифметическое чисел больше 3. Молюю​

Answer 1

Ответ:

Обычно, если человек не указывает язык, то по итогу оказывается что нужно ему на паскале.

PascalABC.NET

begin

 var nums := ArrRandom(100, -99, 99);

 nums.Where(x-> x>3).Average.Println;

end.

Объяснение:

Answer 2

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

begin

 var n := ReadInteger('Количество чисел =');

 ReadSeqReal('Вводите:', n).Where(p -> p > 3)

     .DefaultIfEmpty.Average.Println

end.

Answer 3

Конечно, я могу помочь вам написать программу нахождения среднего арифметического чисел, больших 3. Для примера, я представлю код на языке Python:

pythonCopy code
def find_average_greater_than_three(numbers):
    count = 0
    total_sum = 0

    for num in numbers:
        if num > 3:
            total_sum += num
            count += 1

    if count == 0:
        return "Нет чисел больше 3"
    else:
        average = total_sum / count
        return average

# Пример использования:
numbers_list = [5, 2, 7, 8, 1, 4, 6]
result = find_average_greater_than_three(numbers_list)
print("Среднее арифметическое чисел больше 3:", result)

Вы можете запустить этот код в среде Python, и он найдет среднее арифметическое всех чисел, больших 3, из списка numbers_list. Обратите внимание, что если в списке нет чисел больше 3, программа вернет сообщение "Нет чисел больше 3".