Сформировать двумерный массив, у которого значения элементов равны 1, если индекс этого столбца четный, и равны 0, если индекс столбца нечетный.
begin
var (m, n) := ReadInteger2('Количество строк и столбцов в массиве:');
var a := MatrGen(m, n, (i, j)-> j.IsOdd ? 1 : 0);
a.Println(2)
end.
