PASCAL

[Диман-Качуг]

Задача по двухмерным массивам..она звучит так-"Дана целочисленная матрица размера M * N . Найти сумму отрицательных элементов каждого столбца матрицы ?" помогите пожалуйста написать программу по данной задачи в Pascal,но только если можно по простому,чтоб я сам мог это понять. Спасибо большое за ранее

[Alex11223]

Сумму элементов надо вывести для каждого столбца отдельно или общую?

Здесь обычно не пишут код за вас, а помогают решить. Задача элементарная, потратьте 5мин на изучение соответствующего раздела учебника.

Алгоритм примерно такой: "проходите" каждый элемент матрицы циклом и если он отрицательный, прибавляете его значение к переменной, в которой будете хранить сумму.

[Vanta11a]

Просто и понятно - 50 руб.

Сложнее, но бесплатно - вот.

[Mad_Cat]

for j:=1 to n do
begin s:=0;
for i:=1 to m do
if a[i,j]<0 then s:=s+a[i];
writeln('s[',j,']=',s);
end;