Задача. Вычислить сумму элементов каждого столбца массива program summa(output); var I,j:integer; S:array[1..3] of integer; A:array[1..4, 1..3] of integer; begin for I:=1 to 4 do for j:=1 to 3 do read (A[i,j]); for I:=1 to 4 do for j:=1 to 3 do S[j]:
{}