Вычислить сумму чисел в каждой строке матрицы

@Driiim · Регистрация: 25.01.2013

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

Выполнить заданную обработку числового двумерного массива, имеющего произвольное количество строк (N) и столбцов (M). В каждом из вариантов содержатся ограничения на максимальные значения величин N и M. Элементы массива должны вводиться с клавиатуры.
6) Вычислить сумму чисел в каждой строке. N <= 10, M <= 10

Kodzaev · 26.01.2013, 03:38

Pascal

Uses crt;
Var
  x: Array[1..10,1..10] of Integer;
  i,j,n,m,s: Integer;
BEGIN
Repeat
  Writeln('Введите N и M: ');
  Readln(n,m);
until (n<=10) and (m<=10);
Writeln('Введите элементы:');
For i:=1 to n do
For j:=1 to m do
Readln(x[i,j]);
Clrscr;
Writeln('Матрица:');
For i:=1 to n do
begin
  For j:=1 to m do
  Write(x[i,j]:4);
  Writeln
end;
For i:=1 to n do
begin
  For j:=1 to m do
  s:=s+x[i,j];
  Writeln('Сумма ',i,'-й строки: ',s);
  s:=0;
end;
END.

@Driiim 0 / 0 / 0 Регистрация: 25.01.2013 Сообщений: 119
		1
	Вычислить сумму чисел в каждой строке матрицы 25.01.2013, 22:54. Показов 2819. Ответов 1 Метки нет (Все метки) Выполнить заданную обработку числового двумерного массива, имеющего произвольное количество строк (N) и столбцов (M). В каждом из вариантов содержатся ограничения на максимальные значения величин N и M. Элементы массива должны вводиться с клавиатуры. 6) Вычислить сумму чисел в каждой строке. N <= 10, M <= 10 0

	26.01.2013, 03:38

Опции темы

Вычислить сумму чисел в каждой строке матрицы

Решение