Katya007goi
18.08.2022 01:53

Как найти сумму элементов в каждой строке двумерного массива pasckal. и если можно произведение элементов в каждом столбце.

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
aaaaaa29
10.09.2020 14:50
PascalABC.NET 3.3.5, сборка 1659 от 09.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  var (m,n):=ReadInteger2('Количество строк и столбцов в массиве:');
  Writeln('*** Исходный массив ***');
  var a:=MatrRandom(m,n,-99,99);
  a.Println(4); Writeln(4*a.ColCount*'-');
  Writeln('Суммы по строкам');
  a.Rows.Select(row->row.Sum).Println;
  Writeln('Произведения по столбцам');
  a.Cols.Select(col->col.Aggregate(BigInteger(1),(p,q)->p*q)).Println
end.

Пример
Количество строк и столбцов в массиве: 5 4
*** Исходный массив ***
 -99 -70  -9 -24
  87 -34  66  -5
  92 -65  -9 -51
  61  99  79  17
 -40  22  75  88

Суммы по строкам
-202 114 -33 256 145
Произведения по столбцам
1933446240 -336936600 31675050 -9155520
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота