Question

СРОЧНО! Дана матрица размера M × N. Вывести ее элементы, расположенные в столбцах с четными номерами (2, 4, …)
На языке Pascal

Answer 1

===== 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.