В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Luna013
Luna013
24.10.2022 13:03 •  Информатика

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

Показать ответ
Ответ:
yakovleva03ow836v
yakovleva03ow836v
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-бота