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

244

311

Посмотреть ответы 3

Ответы на вопрос:

Крайз

Информатика

4,7(8 оценок)

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.

beknurr546ozpknp

Информатика

4,5(6 оценок)

// 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 -2 0 6 8 -3 6 1 4 6 -3 2 24 4