===== PascalABC.NET =====

begin

 var (m, n) := ReadInteger2('Введите m и n:');

 var a := MatrRandom(m, n, -99, 99);

 a.Println;

 Writeln;

 foreach var j in Range(1, n - 1, 2) do

   a.Col(j).Println

end.