Вычислить произведение отрицательных элементов двумерного массива В(3,4) по каждой строке

begin
  writeln(MatrRandom(3, 4, -50, 50).Println.Rows.Select(v -> v.Aggregate(1, (x, v)-> v < 0 ? x * v : x))
    .Select((v, i)-> Format('{0} строка - {1}', i + 1, v = 1 ? 0 : v)).JoinIntoString(NewLine));
end.

begin
  var a := new integer[3, 4]((1, 2, 3, 4), (-1, 2, -1, 3), (-1, 3, 4, -5));
  writeln({MatrRandom(3, 4, -50, 50)}a.Println.Rows.Select(v -> v.Aggregate(1, (x, v)-> v < 0 ? x * v : x))
    .Select((v, i)-> Format('{0} строка - {1}', i + 1, v = 1 ? 0 : v)).JoinIntoString(NewLine));
end.

begin
  var a := new integer[3, 4]((1, 2, 3, 4), (-1, 2, -1, 3), (-1, 3, 4, -5));
  writeln({MatrRandom(3, 4, -50, 50)}a.Println.Rows.Select(v -> (v.Any(x -> x < 0), v.Aggregate(1, (x, v)-> v < 0 ? x * v : x)))
    .Select((v, i)-> Format('{0} строка - {1}', i + 1, v[0] ? v[1] : 0)).JoinIntoString(NewLine));
end.