Работа 3.6 Упр.5 ГДЗ Семакин 10 класс (Информатика)

Si = корень (Xi-M)2/(N-1),
где М — среднее арифметическое значение последовательности X.

Сначала находим среднее арифметическое последовательности:

$$M=\frac{x_1+x_2+\dots+x_N}{N}$$

Затем для каждого элемента вычисляем значение по формуле:

$$S_i=\sqrt{\frac{(x_i-M)^2}{N-1}}$$

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

var x, s: array[1..max] of real;
n, i: byte;
m: real;
begin
  randomize;
  repeat
    write(‘Размер последовательности n=’);
    readln(n);
  until n in [1..max];
  writeln(‘Последовательность:’);
  m := 0;
  for i := 1 to n do
  begin
    x[i] := 10 * random — 4;
    write(x[i]:6:2);
    m := m + x[i];
  end;
  m := m / n;
  writeln;
  writeln(‘Среднее=’, m:0:2);
  writeln;
  writeln(‘Результат вычислений:’);
  for i := 1 to n do
  begin
    s[i] := sqrt(sqr(x[i] — m) / (n — 1));
    write(s[i]:6:2);
  end;
  readln
end.

В этой программе массив x хранит исходную последовательность, m — её среднее арифметическое, а массив s — результаты вычислений по формуле.

Ответ: программа на Pascal, вычисляющая последовательность $$S_i=\sqrt{\frac{(x_i-M)^2}{N-1}}$$ для заданной последовательности вещественных чисел.