Определить сумму элементов каждого столбца матрицы

@Cherepka92 · Регистрация: 11.02.2011

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

Ввести двумерный массив M x N. Определить сумму элементов каждого столбца

@Z3oM · 14.02.2011, 15:49

Выложи пример ну той задачи которую тебе дали!

@anonimus · 14.02.2011, 20:17

Delphi

procedure TForm1.Button1Click(Sender: TObject);
var mas:array[0..9,0..9]of integer;
mas2:array[0..9]of integer;
i,j:integer;
begin
{заполняем массив}
Randomize;
for i:=0 to high(mas) do
  for j:=0 to high(mas) do
   mas[i,j]:=random(10);
 
fillchar(mas2,sizeof(mas2),0);
 
for i:=0 to high(mas) do
  for j:=0 to high(mas) do
   mas2[j]:=mas2[j]+mas[i,j];
 
for i:=0 to high(mas2) do
  label1.Caption:=label1.Caption+inttostr(mas2[i])+' ';
end;

@Cherepka92 0 / 0 / 0 Регистрация: 11.02.2011 Сообщений: 9
		1
	Определить сумму элементов каждого столбца матрицы 14.02.2011, 14:23. Показов 4679. Ответов 2 Метки нет (Все метки) Ввести двумерный массив M x N. Определить сумму элементов каждого столбца 0

@Z3oM 250 / 71 / 18 Регистрация: 10.04.2010 Сообщений: 532 Записей в блоге: 3
	14.02.2011, 15:49	2
	Выложи пример ну той задачи которую тебе дали! 0

	14.02.2011, 20:17

Определить сумму элементов каждого столбца матрицы

Решение