// PascalABC.NET
begin
var a := MatrRandom(5, 5, 16, 80);
a.Println;
a.ElementsByRow
.Where(p -> p.IsOdd)
.Aggregate(BigInteger.One, (p, q) -> p * q)
.Print
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
// PascalABC.NET
begin
var a := MatrRandom(5, 5, 16, 80);
a.Println;
a.ElementsByRow
.Where(p -> p.IsOdd)
.Aggregate(BigInteger.One, (p, q) -> p * q)
.Print
end.