Определить кол-во и сумму элементов 3 столбца матрицы
2 1 -1 4
-3 1 -4 1
С= 2 1 2 3 удовлетворяющих условию [Сi] <= 3
2 2 5 4
-3 -1 -3 1
for i:=1 to 5 do
begin
if m[i,3]<=3 then
begin
inc(k);
s:=s+m[i,3];
end;
end;