Найдите сумму элементов в массиве (3,5 ; 18.3 ; 28,5 ; 1,5 ; 0,18) напишите программу на pascal.

// pascalabc.net 3.2, сборка 1353 от 27.11.2016 // внимание! если программа не работает, обновите версию! begin   var a: =arr(3.5,18.3,28.5,1.5,0.18); a.println;   writeln('s=',a.sum) end. результат 3.5 18.3 28.5 1.5 0.18 s=51.98

// 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