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

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

Задать свой вопрос
1 ответ
// 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-gt;t[2].IsOdd).Select(t-gt;t[0]).
      Aggregate(BigInteger(1),(x,y)-gt;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
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт