Question

найти среднее арифметическое отрицательных элементов массива в Паскале. Распишите пожалуйста.

Answer 1

#include <sosnick.y>

begin

goto (-------> massive);

goto (<------ massive);

while funkation (<0) do

massive:= sosnicky (goto -------> type array);

writeln (massive);

end.

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Answer 2

Для нахождения среднего арифметического отрицательных элементов в массиве в Паскале, вам потребуется выполнить следующие шаги:

1. Создайте массив с числами, в котором будут как положительные, так и отрицательные элементы. 2. Объявите переменные `sum` и `count` для хранения суммы и количества отрицательных элементов соответственно. Изначально установите их значения равными 0. 3. Пройдитесь по каждому элементу массива и проверьте, является ли он отрицательным. 4. Если элемент отрицательный, добавьте его к переменной `sum` и увеличьте значение переменной `count` на 1. 5. После завершения цикла, вычислите среднее арифметическое отрицательных элементов, разделив сумму на количество отрицательных элементов. 6. Выведите полученное среднее арифметическое.

Вот пример кода на Паскале, реализующего описанный алгоритм:

program AverageOfNegativeElements;

const
  N = 10; // размер массива

var
  arr: array[1..N] of Integer;
  i, count, sum: Integer;
  average: Real;

begin
  // Заполнение массива случайными числами
  Randomize;
  for i := 1 to N do
    arr[i] := Random(21) - 10; // генерация чисел от -10 до 10

// Нахождение среднего арифметического отрицательных элементов
  count := 0;
  sum := 0;
  for i := 1 to N do
  begin
    if arr[i] < 0 then
    begin
      sum := sum + arr[i];
      count := count + 1;
    end;
  end;

if count > 0 then
  begin
    average := sum / count;
    writeln('Среднее арифметическое отрицательных элементов: ', average:0:2);
  end
  else
    writeln('В массиве нет отрицательных элементов.');

readln;
end.

В этом примере мы создаем массив `arr` размером `N` и заполняем его случайными числами от -10 до 10. Затем мы проходим по каждому элементу массива, проверяем, является ли он отрицательным, и если да, то добавляем его к переменной `sum` и увеличиваем значение переменной `count`. После завершения цикла мы вычисляем среднее арифметическое отрицательных элементов, разделив сумму на количество отрицательных элементов, и выводим результат на экран.

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

Источник: