Вычисления с хранением последовательности значений

@JiL777 · Регистрация: 03.12.2015

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

Даны действительные числа a₁, ..., a₁₅. Получить

$https://www.cyberforum.ru/cgi-bin/latex.cgi?<br /> \bar{a}=\frac 1{15}\sum_{i=1}^{15}a_i\,;\qquad s=\sqrt{\frac{\sum_{ i=1}^{15}\left(a_i-\bar{a} \right)^2}{14}}<br />$

Вложение 632267

@Puporev · 11.01.2016, 20:32

Задай массив из 16 элементов.
Сложи их все и раздели на 15, получишь А среднее.(1).
Потом найди сумму квадратов разностей a[i]-a_sred, раздели ее на 14 и извлеки квадратный корень (sqrt)

@JiL777 · 12.01.2016, 01:33 **[ТС]**

Pascal

type
  a = array[1..16] of real;
 
var
  
  q,mas_sredn,s:real;
  i: integer;
  mas: a;
 
begin
  randomize;
 q:=0;
  for i := 1 to 16 do
  begin
    mas[i] := random(50)-0.50;
    write(mas[i]:7:2);
    q := q+mas[i];
  end;
  writeln;
  writeln('Сумма всех элементов матрицы=',q:3:1);
  mas_sredn:=q/15;
  writeln('Среднее матрицы = ',mas_sredn:3:1);
  s:=sqrt((q-mas_sredn)/14);
  writeln('S=',s);
  
end.

правильно???

@Cyborg Drone · 12.01.2016, 04:01

Нет.

1) Массив и счётчик по заданию индексируются до 15, а не до 16.
2) Неверно вычислено стандартное отклонение.
3) Вызывает сомнение диапазон генерируемых значений последовательности.

Не по теме:

И не выкладывайте фотографии текста. Это запрещено. Надоест за Вас формулы писать - начну поступать с Вами нехорошо.

@Puporev · 12.01.2016, 08:44

Ну опечатался я , вместо 15 написал 16, так своих-то мозгов совсем нет что ли?

Pascal

const n=15;
type mas=array[1..n] of real;
var q,mas_sredn,s:real;
    i: integer;
    a:mas;
begin
randomize;
q:=0;
for i:=1 to n do
 begin
  a[i]:=-5+10*random;
  write(a[i]:7:2);
  q := q+a[i];
 end;
writeln;
writeln('Сумма всех элементов массива=',q:0:2);
mas_sredn:=q/n;
writeln('Среднее массива=',mas_sredn:0:2);
s:=0;
for i:=1 to n do
s:=s+sqr(a[i]-mas_sredn);
s:=sqrt(s/(n-1));
writeln('S=',s:0:2);
 
end.

@Cyborg Drone · 12.01.2016, 13:32

Не по теме:

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

Ну опечатался я

Puporev, не заметил, что это Ваш посыл. Извиняюсь. Вечно моё крючкотворство не к месту.

@Puporev · 12.01.2016, 13:45

Не по теме:

Сообщение от Cyborg Drone

не заметил, что это Ваш посыл.

Я тоже, иначе бы про мозги не писал...

@JiL777 0 / 0 / 0 Регистрация: 03.12.2015 Сообщений: 23
		1
	Вычисления с хранением последовательности значений 11.01.2016, 15:46. Показов 1229. Ответов 6 Метки нет (Все метки) Даны действительные числа a₁, ..., a₁₅. Получить $https://www.cyberforum.ru/cgi-bin/latex.cgi?<br /> \bar{a}=\frac 1{15}\sum_{i=1}^{15}a_i\,;\qquad s=\sqrt{\frac{\sum_{ i=1}^{15}\left(a_i-\bar{a} \right)^2}{14}}<br />$ Вложение 632267 0

@Puporev Почетный модератор 64287 / 47586 / 32739 Регистрация: 18.05.2008 Сообщений: 115,182
	11.01.2016, 20:32	2
	Задай массив из 16 элементов. Сложи их все и раздели на 15, получишь А среднее.(1). Потом найди сумму квадратов разностей a[i]-a_sred, раздели ее на 14 и извлеки квадратный корень (sqrt) 0

@Cyborg Drone Модератор 9593 / 4912 / 3245 Регистрация: 17.08.2012 Сообщений: 15,346
	12.01.2016, 04:01	4
	Нет. 1) Массив и счётчик по заданию индексируются до 15, а не до 16. 2) Неверно вычислено стандартное отклонение. 3) Вызывает сомнение диапазон генерируемых значений последовательности. Не по теме: И не выкладывайте фотографии текста. Это запрещено. Надоест за Вас формулы писать - начну поступать с Вами нехорошо. 0

@Cyborg Drone
	12.01.2016, 13:32 #6
	Не по теме: Сообщение от Puporev Ну опечатался я Puporev, не заметил, что это Ваш посыл. Извиняюсь. Вечно моё крючкотворство не к месту. 0

@Puporev
	12.01.2016, 13:45 Вычисления с хранением последовательности значений #7
	Не по теме: Сообщение от Cyborg Drone не заметил, что это Ваш посыл. Я тоже, иначе бы про мозги не писал... 0

Опции темы

Вычисления с хранением последовательности значений

Решение