// PascalABC.NET
begin
var n := ReadInteger('n =');
var M := ReadMatrReal(n, n);
var r := M.ElementsWithIndices.MinBy(t -> t[0])[1];
M.Row(r).Sum.Print
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
// PascalABC.NET
begin
var n := ReadInteger('n =');
var M := ReadMatrReal(n, n);
var r := M.ElementsWithIndices.MinBy(t -> t[0])[1];
M.Row(r).Sum.Print
end.