Question

ДАЮ 40 БАЛЛОВ ВЫПОЛНИТЕ СРОЧНО!!!! Напишите программу, которая считывает с клавиатуры n чисел и затем выводит на экран: а)сумму и среднее арифметическое считанных чил; б)сумму и среднее арифметическое положительных чисел; в)сумму и среднее арифметическое отрицательных чисел.

Answer 1

Ответ:

PascalABC.NET 3.5.1 + .NET Framework 4.7.1

begin

 var A := ReadArrInteger(readinteger('n = '));

 //Среднее арифметическое

 A.Average.Println;

 //Среднее арифметическое положительных

 A.Where(p -> p >= 0).Average.Println;

 //Среднее арифметическое отрицательных

 A.Where(p -> p < 0).Average.Println;

end.

Объяснение:

Answer 2

Хорошо, вот программа на языке Python, которая выполняет задачу:

pythonCopy code
def main():
    n = int(input("Введите количество чисел: "))
    numbers = []
    
    for i in range(n):
        num = float(input(f"Введите число {i + 1}: "))
        numbers.append(num)

    sum_all = sum(numbers)
    average_all = sum_all / n

    positive_numbers = [num for num in numbers if num > 0]
    sum_positive = sum(positive_numbers)
    average_positive = sum_positive / len(positive_numbers)

    negative_numbers = [num for num in numbers if num < 0]
    sum_negative = sum(negative_numbers)
    average_negative = sum_negative / len(negative_numbers)

    print("\nОбщая сумма чисел:", sum_all)
    print("Среднее арифметическое всех чисел:", average_all)

    print("\nСумма положительных чисел:", sum_positive)
    print("Среднее арифметическое положительных чисел:", average_positive)

    print("\nСумма отрицательных чисел:", sum_negative)
    print("Среднее арифметическое отрицательных чисел:", average_negative)


if __name__ == "__main__":
    main()

Программа считывает n чисел с клавиатуры, затем находит сумму и среднее арифметическое для всех чисел, положительных чисел и отрицательных чисел. После чего выводит полученные значения на экран.