Подсчитать сумму элементов столбца j массива a[i,j], запол. случайными числами

Мне на паскаль нужно)

А зачем в графике-то делать?

// PascalABC.NET 3.2, сборка 1379 от 21.01.2017// Внимание! Если программа не работает, обновите версию!begin  var m:=ReadInteger('Количество строк в массиве:');  var n:=ReadInteger('Количество столбцов в массиве:');  Writeln('*** Исходный массив [',m,',',n,'] ***');  var a:=MatrRandom(m,n,-99,99);   a.Println(4); Writeln(4*a.ColCount*'-');  var k:=ReadInteger('Номер столбца для подсчета суммы:');  Writeln('S=',a.Col(k-1).Sum)end.ПримерКоличество строк в массиве: 5Количество столбцов в массиве: 8*** Исходный массив [5,8] ***  91 -39  49  29 -60 -58 -88  -5 -80  -5  58  38 -75 -76 -54 -33 -60 -66  98 -88  96 -48  94   2  -4  81 -38 -91  26 -91  32   7  30  83  30   3  22  93  31   0--------------------------------Номер столбца для подсчета суммы: 4S=-109На случай, если я неверно понял задание и нужна сумма по КАЖДОЙ колонке:begin  var m:=ReadInteger('Количество строк в массиве:');  var n:=ReadInteger('Количество столбцов в массиве:');  Writeln('*** Исходный массив [',m,',',n,'] ***');  var a:=MatrRandom(m,n,-99,99);   a.Println(4); Writeln(4*a.ColCount*'-');  a.Cols.Select(s->s.Sum).Printlnend.ПримерКоличество строк в массиве: 4Количество столбцов в массиве: 7*** Исходный массив [4,7] ***  13 -14  82  88 -38  55  89  11  74 -35  85  13  27 -80 -88  76 -64 -88 -50  28 -13  90  87 -71 -94 -59  95 -83----------------------------26 223 -88 -9 -134 205 -87