Question

Pascal
Ввести двумерный массив, состоящую из [n,m] элементов. Найдите сумму всех элементов.

Answer 1

                                          PascalABC.NET

begin

 var m := MatrRandom(ReadInteger('n ='),ReadInteger('m ='),0,9).Println;

 var sum: integer;

 m.ForEach(x -> begin sum+=x end);

 Writeln('Сумма элементов массива: ',sum);

end.

//Если нужно вводить элементы  массива самому измени:

"MatrRandom(ReadInteger('n ='),ReadInteger('m ='),0,9)"

на

"ReadMatrInteger(ReadInteger('n ='),ReadInteger('m ='))"

Answer 2

Мать честнАя! Ну ввели массив, а дальше пишите m.ElementsByRow.Sum или m.ElementsByCol.Sum

Answer 3

Развернет массив в последовательность по строками или столбцам.

Answer 4

Давай я без твоих сомнительных оценок обойдусь?