Помогите пожалуйста написать программу в паскале:Определить кол-во положительных и отрицательных элементов в каждом столбце массива A(N,M) ПОМОГИТЕЕЕ

// PascalABC.NET 3.2, сборка 1382 от 06.02.2017 // Внимание! Если программа не работает, обновите версию! begin   var n:=ReadInteger('Количество строк в массиве:');   var m:=ReadInteger('Количество столбцов в массиве:');   Writeln('*** Исходный массив [',n,',',m,'] ***');   var a:=MatrRandom(n,m,-99,99);   a.Println(4); Writeln(5*a.ColCount*'-');   a.Cols.Select(x->Format('{0,4}',x.Where(y->y>0).Count)).Print('');   Println(' - положительных');   a.Cols.Select(x->Format('{0,4}',x.Where(y->y<0).Count)).Print('');   Println(' - отрицательных'); end. Пример Количество строк в массиве: 5 Количество столбцов в массиве: 8 *** Исходный массив [5,8] ***   32  83 -68 -33 -63  43   0  30   81  46 -52  56  49  10 -31   9  -41 -56 -80  70 -95  94 -53  56    0 -87 -24  23 -54  24 -84  -3   22  74  54 -98  42  94 -68  59 ----------------------------------------    3   3   1   3   2   5   0   4 - положительных    1   2   4   2   3   0   4   1 - отрицательных