Вычислить среднее значение элементов массива - PascalABC.NET

Узнай цену своей работы

Формулировка задачи:

Дорогие, помогите, пожалуйста исправить и доделать: сгенерировать и вывести массив из 100 элементов со значениями в пределах [0;100]. Вычислить среднее значение элементов и среднеквадратическое отклонение от него.
#== Подскажите, пожалуйста, подробный алгоритм составления перестановок по этой программе:

Решение задачи: «Вычислить среднее значение элементов массива»

textual
Листинг программы
const n=100;
var
sa,sk: real;
a: array [1..n] of integer;
i,j: integer;
begin
randomize;
writeln('Введенный массив:');
sa:=0;
for i:=1 to n do
 begin
  a[i]:=random(101);
  write(a[i]:4);
  if i mod 20=0 then writeln;
  sa:=sa+a[i];
 end;
writeln;
sa:=sa/n;
writeln('Среднее арифметическое=',sa:0:2);
sk:=0;
for i:=1 to n do
sk:=sk+sqr(a[i]-sa);
sk:=sqrt(sk/(n-1));
writeln('Среднеквадратичное отклонение=',sk:0:2);
end.

Объяснение кода листинга программы

  1. Введенные переменные:
    • n = 100 (количество элементов в массиве)
    • sa, sk = 0 (для хранения суммы и среднеквадратичного отклонения)
    • a = array [1..n] of integer (массив для хранения чисел)
    • i, j = 0 (для контроля цикла)
  2. Заполнение массива a случайными числами от 0 до 100
  3. Вывод каждого элемента массива a в консоль с пробелом в качестве разделителя
  4. Расчет суммы всех элементов массива a и сохранение ее в переменной sa
  5. Деление суммы на количество элементов массива a для получения среднего арифметического
  6. Вывод среднего арифметического на экран
  7. Расчет среднеквадратичного отклонения путем вычисления разницы между каждым элементом массива a и средним значением
  8. Возведение разницы в квадрат и суммирование всех полученных значений
  9. Деление полученной суммы на количество элементов массива a минус 1 для получения среднеквадратичного отклонения
  10. Вывод среднеквадратичного отклонения на экран

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

14   голосов , оценка 3.786 из 5
Похожие ответы