Question

Дано масив А[1..n]. Скласти програму підрахунку середніх арифметичних всіх від’ємних та всіх додатніх його чисел.

Answer 1

PascalABC.Net

• begin
•  var n := ReadInteger('Введите длину массива');
•  var a := ArrRandom(n, -50, 50);
•  Println('Исходный массив');
•  a.Println;
•  a.Where(p -> p < 0).Average.Println;
•  a.Where(p -> p > 0).Average.Println;
• end.

Answer 2

Для підрахунку середніх арифметичних від'ємних та додатніх чисел у масиві А, потрібно виконати наступні кроки:

1. Ініціалізувати дві змінні: сума від'ємних чисел та кількість від'ємних чисел для обрахунку середнього арифметичного від'ємних чисел.
2. Ініціалізувати ще дві змінні: сума додатніх чисел та кількість додатніх чисел для обрахунку середнього арифметичного додатніх чисел.
3. Проходитися по всім елементам масиву А і перевіряти, чи вони є від'ємними чи додатніми.
4. Додавати відповідний елемент до відповідної суми та збільшувати відповідну кількість чисел, залежно від того, чи вони є від'ємними чи додатніми.
5. Обчислити середнє арифметичне для від'ємних чисел і для додатніх чисел.

Ось код у псевдокоді для виконання цієї задачі:

plaintextCopy code
Функція знайди_середнє_арифметичне(масив А[1..n])
    від_сума = 0
    дод_сума = 0
    від_кількість = 0
    дод_кількість = 0

    Для кожного елементу а в масиві А виконати:
        Якщо а < 0:
            від_сума = від_сума + а
            від_кількість = від_кількість + 1
        Інакше:
            дод_сума = дод_сума + а
            дод_кількість = дод_кількість + 1

    Якщо від_кількість > 0:
        середнє_від = від_сума / від_кількість
    Інакше:
        середнє_від = 0

    Якщо дод_кількість > 0:
        середнє_дод = дод_сума / дод_кількість
    Інакше:
        середнє_дод = 0

    Вивести середнє_від, середнє_дод

Кінець функції

Масив А = [3, -1, 5, -7, 2, 0, -4]
знайди_середнє_арифметичне(А)

Якщо масив А містить числа [3, -1, 5, -7, 2, 0, -4], виконання функції знайди_середнє_арифметичне(А) надасть вам результат: Середнє арифметичне від'ємних чисел: (-1 + (-7) + (-4)) / 3 = -4 Середнє арифметичне додатніх чисел: (3 + 5 + 2) / 3 = 3.33 (округлений до двох десяткових знаків)

Будь ласка, зауважте, що в залежності від мови програмування, яку ви використовуєте, синтаксис може відрізнятися, але загальний алгоритм буде такий самий.