// PascalABC.NET 3.3, сборка 1576 от 16.11.2017// Внимание! Если программа не работает, обновите версию!beginvar V:=MatrRandom(7,7,-15,15);v.Println;var com:= V.Row(2).Aggregate(BigInteger(1),(x,y)->(x*y));Writeln('Произведение эл-в 3ей строки = ', com);var cnt := 0;Foreach var x in V.Row(2) do if x > com then inc(cnt);Writeln('Количество элементов, больших чем это произведение = ', cnt);Writeln('Максимальный элемент 3го столбца = ', V.Col(2).Max);end.Пример: 2 -4 -15 10 -1 2 6 15 -8 11 5 14 10 15 0 15 -10 13 -8 -13 14 14 6 13 -10 9 6 -12 -14 1 8 -9 1 -12 12 15 9 10 -7 -14 6 -3 9 9 -1 -14 1 1 3Произведение эл-в 3ей строки = 0Количество элементов, больших чем это произведение = 3Максимальный элемент 3го столбца = 13*****Правил*****