На языке паскаль. вычислить сумму всех элементов двумерного массива

// pascalabc.net 3.2, сборка 1383 от 09.02.2017 // внимание! если программа не работает, обновите версию! begin   var n: =readinteger('количество строк в массиве: ');   var m: =readinteger('количество столбцов в массиве: ');   writeln('*** исходный массив [',n,',',m,'] ***');   var a: =matrrandom(n,m,-99,99);   a.println(5); writeln(5*a.colcount*'-');   writeln('сумма элементов массива: ',           a.rows.selectmany(x-> x).sum) end. пример количество строк в массиве: 6 количество столбцов в массиве: 9 *** исходный массив [6,9] ***     39    99    51    44  -28  -85  -52  -98  -56     68    41      3    34    54  -39  -72    15  -80     47  -11    35  -50    65    70    58    52    -1     38    82  -37    93    32    51  -82  -32    98   -72  -12    59    87    44    -4  -14  -56    13     44    72      1    63    48  -77      4  -28    73 сумма элементов массива: 691

Uses graphabc; begin setwindowsize (600, 600); setpencolor (clblack); setbrushcolor (clgray); rectangle (90, 90, 210, 450 ); setpencolor (clred); setbrushcolor (clred); circle (150, 150, 50); setpencolor (clyellow); setbrushcolor (clyellow); circle (150, 260, 50); setpencolor (clgreen); setbrushcolor (clgreen); circle (150, 370, 50); setpencolor (clblack); setbrushcolor (clgray); rectangle (140, 450, 160, 600) end.