Сформировать вектор, каждый элемент которого равен среднему арифметическому значений элементов строк матрицы

06.12.2012, 19:38. **Показов** 2031. **Ответов** 1

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

Сформировать вектор D=(d₁, d₂, d₃,...,d_k), каждый элемент которого равен среднему арифметическому значений элементов строк матрицы C размерностью KxP.

@ermolay · 08.12.2012, 22:32

Pascal

const
  nmax=20;
var
  a: array[1..nmax,1..nmax] of integer;
  d: array[1..nmax] of real;
  n,m,i,j,sum: integer;
begin
  write('Введите размеры матрицы k, p: ');
  readln(n,m);
  writeln('Исходная матрица:');
  for i:=1 to n do
  begin
    sum:=0;
    for j:=1 to m do
    begin
      a[i,j]:=random(199)-99;
      write(a[i,j]:4);
      sum:=sum+a[i,j];
    end;
    d[i]:=sum/m;
    writeln;
  end;
  writeln;
  writeln('Полученный вектор:');
  for i:=1 to n do write(d[i]:7:2);
end.

razorone
		1
	Сформировать вектор, каждый элемент которого равен среднему арифметическому значений элементов строк матрицы 06.12.2012, 19:38. Показов 2031. Ответов 1 Метки c, вектор, неободим, программа, с, Сформировать (Все метки) Сформировать вектор D=(d₁, d₂, d₃,...,d_k), каждый элемент которого равен среднему арифметическому значений элементов строк матрицы C размерностью KxP.

Опции темы

Сформировать вектор, каждый элемент которого равен среднему арифметическому значений элементов строк матрицы

Решение