Подсчёт среднего арифметического матрицы, и отклонения от среднего у элементов первой строки

@Александра1506 · Регистрация: 06.04.2017

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

Дана целочисленная матрица. Составить программу подсчёта среднего арифметического значения матрицы. Найти отклонение от среднего у элементов первой строки
Помогите пожалуйста!

@Ivandur · 06.04.2017, 14:27

Pascal

sum:=0;
for i:=1 to n do
  for j:=1 to m do
    sum:=sum+a[i,j];
avg:=sum(n*m);
for j:=1 to m do
   write(abs(a[1,j]-avg,' ');
writeln;

примерно так...

@bormant · 08.04.2017, 15:57

Pascal

const m=5; n=5; W=6;
var
  a: array [1..m,1..n] of Integer;
  i, j: Integer;
  avg: Real;
begin
  Randomize;
  for i:=1 to m do for j:=1 to n do a[i,j]:=Random(100);
  for i:=1 to m do for j:=1 to n do avg:=avg+a[i,j]; avg:=avg/m/n;
  WriteLn('A =');
  for i:=1 to m do begin
    for j:=1 to n do Write(a[i,j]:W); WriteLn;
  end;
  WriteLn('Среднее: ',avg:0:1);
  WriteLn('Отклонения 1 строки:');
  for j:=1 to n do Write(avg-a[1,j]:W:1); WriteLn;
end.

@Александра1506 0 / 0 / 0 Регистрация: 06.04.2017 Сообщений: 7
		1
	Подсчёт среднего арифметического матрицы, и отклонения от среднего у элементов первой строки 06.04.2017, 12:42. Показов 2378. Ответов 2 Метки нет (Все метки) Дана целочисленная матрица. Составить программу подсчёта среднего арифметического значения матрицы. Найти отклонение от среднего у элементов первой строки Помогите пожалуйста! 0

	08.04.2017, 15:57

Подсчёт среднего арифметического матрицы, и отклонения от среднего у элементов первой строки

Решение