Вычислить среднее арифметическое данной последовательности

@skiser1 · Регистрация: 06.01.2010

Author24 — интернет-сервис помощи студентам

. Задана последовательность N вещественных чисел. Вычислить

где М — среднее арифметическое данной последовательности.

помогите пождста!))

@Helfer · 10.02.2010, 23:14

Что вычислить? Среднее арифметическое?

@skiser1 · 12.02.2010, 22:32 **[ТС]**

Уточняю задание:
Задана последовательность N вещественных чисел. Вычислить

Si=корень квадратный из((Xi-M)в квадрате/(N-1))
или запишу по другому: Si=Sqrt(Sqr (Xi-M)/(N-1))
где М — среднее арифметическое данной последовательности

@Puporev · 13.02.2010, 09:04

Pascal

uses crt;
const max=100;
var x,s:array[1..max] of real;
    n,i:byte;
    m:real;
begin
clrscr;
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.

@JL25A · 21.10.2011, 15:39

Сообщение от Puporev

Pascal

1	x[i]:=10*random-4;

Объясните поподробнее все что тут написано, зачем нужно умножать 10 на random и отнимать -4?

@Puporev · 21.10.2011, 18:32

Просто мы хотим чтобы у нас были случайные вещественные числа от (-4 до 6, ну захотелось так.
Поэтому мы берем числа от (0 до 10) и вычитаем 4. Получим интервал (-4;6).
значение random изменяется в интервале(0;1), значит 10*random = (0;10)

@ggobdin1 · 27.11.2019, 15:45

А как это реализовать в VBA?

@Puporev · 27.11.2019, 15:50

Спросите здесь
https://www.cyberforum.ru/vba/

@skiser1 0 / 0 / 0 Регистрация: 06.01.2010 Сообщений: 39
		1
	Вычислить среднее арифметическое данной последовательности 10.02.2010, 23:04. Показов 7968. Ответов 7 Метки нет (Все метки) . Задана последовательность N вещественных чисел. Вычислить где М — среднее арифметическое данной последовательности. помогите пождста!)) 0

@Helfer ЙожЪ 64 / 60 / 17 Регистрация: 23.10.2009 Сообщений: 652
	10.02.2010, 23:14	2
	Что вычислить? Среднее арифметическое? 0

@skiser1 0 / 0 / 0 Регистрация: 06.01.2010 Сообщений: 39
	12.02.2010, 22:32 [ТС]	3
	Уточняю задание: Задана последовательность N вещественных чисел. Вычислить Si=корень квадратный из((Xi-M)в квадрате/(N-1)) или запишу по другому: Si=Sqrt(Sqr (Xi-M)/(N-1)) где М — среднее арифметическое данной последовательности 0

@Puporev Почетный модератор 64300 / 47595 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	21.10.2011, 18:32	6
	Просто мы хотим чтобы у нас были случайные вещественные числа от (-4 до 6, ну захотелось так. Поэтому мы берем числа от (0 до 10) и вычитаем 4. Получим интервал (-4;6). значение random изменяется в интервале(0;1), значит 10*random = (0;10) 0

@ggobdin1 0 / 0 / 0 Регистрация: 17.11.2019 Сообщений: 25
	27.11.2019, 15:45	7
	А как это реализовать в VBA? 0

@Puporev Почетный модератор 64300 / 47595 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	27.11.2019, 15:50	8
	Спросите здесь https://www.cyberforum.ru/vba/ 0