oleg34643
31.01.2020 03:04

Найти произведение элемента массива d[3,8] стоящих в четных столбцах. в паскале

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Dimn11
07.10.2020 02:59
// PascalABC.NET 3.3, сборка 1555 от 21.10.2017
// Внимание! Если программа не работает, обновите версию!

begin
  Writeln('*** Исходный массив ***');
  var a:=MatrRandom(3,8,-99,99);
  a.Println(4); Writeln(4*a.ColCount*'-');
  Writeln('Искомое произведение ',
      a.ElementsWithIndexes.Where(t->t[2].IsOdd).Select(t->t[0]).
      Aggregate(BigInteger(1),(x,y)->x*y));
end.

Пример
*** Исходный массив ***
  60 -23  10 -18 -97 -90 -56   5
  32  51  -2   3  63 -76  17  85
 -41 -64   9  59  84 -66  69  28

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