Question

Составить программу для нахождения среднего арифметического n элемента (паскаль)

Answer 1

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

program Average;
var
  n, i, sum: integer;
  average: real;
begin
  sum := 0;
  
  writeln('Введите количество элементов (n): ');
  readln(n);
  
  writeln('Введите элементы:');
  for i := 1 to n do
  begin
    write('Элемент ', i, ': ');
    readln(element);
    sum := sum + element;
  end;
  
  average := sum / n;
  
  writeln('Среднее арифметическое: ', average:0:2);
end.

В этой программе мы сначала объявляем переменные `n`, `i`, `sum` и `average`. Затем мы инициализируем `sum` нулевым значением.

Далее мы запрашиваем у пользователя количество элементов `n` и вводим сами элементы в цикле `for`. В каждой итерации цикла мы запрашиваем у пользователя значение элемента и добавляем его к `sum`.

После завершения цикла мы вычисляем среднее арифметическое, разделив `sum` на `n`. Затем выводим результат на экран.

Пример работы программы: ``` Введите количество элементов (n): 5 Введите элементы: Элемент 1: 10 Элемент 2: 15 Элемент 3: 20 Элемент 4: 25 Элемент 5: 30 Среднее арифметическое: 20.00 ```

Эта программа позволяет пользователю ввести любое количество элементов и вычислить их среднее арифметическое.