10 класс) Все сложноооо...
Вычислить сумму элементов каждого столбца двумерного массива.массив заполняется с клавиатуры и размерность тож с клавиатуры.
.Массив распечатать в виде таблицы(без setlength)
помогите пожалуйста,кто тут шарит по информатике?!

Динамические массивы - вовсе не обязательно setlength ))))

В задании не было упоминания о динамических массивах

И на этом надо играть - учить корректно ставить вопросы.

Более того, даже язык не был назван.

И, поскольку вод с клавиатуры, т.е. ручной, не смысла задавать даже статический массив подобного размера. За глаза будет написать 100х100

var   i, n, m, j, max: integer;    ar: array[1..10000, 1..10000]of integer;    sum: array[1..10000]of integer;  begin   readln(n, m);    for i := 1 to n do      for j := 1 to m do      begin       read(ar[i, j]);       sum[j] := sum[j] + ar[i, j];     end;    writeln;   for i := 1 to m do write(sum[i], ' ');  end.

// PascalABC.NET 3.2, сборка 1344 от 22.11.2016// Внимание! В более ранних версиях работа не гарантируется!begin  var m:=ReadInteger('Количество строк в массиве:');  var n:=ReadInteger('Количество столбцов в массиве:');  Writeln('Вводите элементы массива');  var a:=new integer[m,n];  for var i:=0 to m-1 do    for var j:=0 to n-1 do Read(a[i,j]);  Writeln('-'*20);  foreach var c in a.Cols do Write(c.Sum,' ')end.ПримерКоличество строк в массиве: 4Количество столбцов в массиве: 3Вводите элементы массива1 6 -20 6 8-3 6 14 6 -3--------------------2 24 4