Определить номера строк таблицы, начинающихся с одинаковых чисел, и подсчитать сумму элементов в этих строках

@Snailll · Регистрация: 01.11.2016

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

Дана прямоугольная таблица чисел А[1..n,1..m]. Составить алгоритм, который определял бы номера строк таблицы, начинающихся с одинаковых чисел и подсчитывал бы сумму элементов в этих строках.

@StarkKirill · 05.12.2016, 21:26

Начинающихся?

@Snailll · 05.12.2016, 22:11 **[ТС]**

Да, именно

Добавлено через 12 минут
Не понимаю как реализовать

@StarkKirill · 05.12.2016, 23:58

ещё раз , просто чтобы элементы повторялись? Например
1 2 3
4 4 5
3 3 3
Т.е строка 2 и 3, и считаем сумму во 2 = 13 , и в 3 = 9

Добавлено через 12 минут

Pascal

type mas = array [1..100,1..100] of integer;
var a:mas; sum,z,i,j,n,m:integer;
begin
writeln('введите ширину и длину');
readln(n,m);
writeln('введите элементы массива');
for i:=1 to n do
for j:=1 to m do
readln(a[i,j]);
for i:=1 to n do
for j:=1 to m do
if a[i,j] = a[i+1,j+1] then
begin
sum:=0;
for z:=1 to m do
sum:=sum+a[i,z];
writeln('сумма в строке = ',i,' равна = ',sum);
end;
for i:=1 to n do
begin
for j:=1 to m do
write(a[i,j],' ');
writeln;
end;
 
end.

@Snailll 1 / 1 / 1 Регистрация: 01.11.2016 Сообщений: 16
		1
	Определить номера строк таблицы, начинающихся с одинаковых чисел, и подсчитать сумму элементов в этих строках 05.12.2016, 21:04. Показов 1151. Ответов 3 Метки нет (Все метки) Дана прямоугольная таблица чисел А[1..n,1..m]. Составить алгоритм, который определял бы номера строк таблицы, начинающихся с одинаковых чисел и подсчитывал бы сумму элементов в этих строках. 0

@StarkKirill 1 / 1 / 2 Регистрация: 10.10.2016 Сообщений: 12
	05.12.2016, 21:26	2
	Начинающихся? 0

@Snailll 1 / 1 / 1 Регистрация: 01.11.2016 Сообщений: 16
	05.12.2016, 22:11 [ТС]	3
	Да, именно Добавлено через 12 минут Не понимаю как реализовать 0

	05.12.2016, 23:58