Люди добрые помогите!!!...

[Stas)))]

Народ подскажите, вобщем нада в матрицу, добавить столбец из нулей, после последнего столбца в котором все елементы отрицательные (матрица в StringGrid), .....Вот кусок из проги дальше нада воткнуть столбец....
k:=0;
for j:=1 to n do {столбцы}
for i:=1 to m do {строки}
if A[j,i]<0 then
k:=k+1;
if k=m then ..... (вот сюды нада столбец...)...
И еще по моему при данном условии, столбец из нулей будет добавлять после первого столбца с отрицательными элемнтами..... Плиз, ХЕЛП МИ..

[А. Долматов]

ну в цикле все верно в переменную записываем количество столбцов с отрицательными элементами, а дальше просто необходимо увеличить размерность матрицы на единицу(столбцов), т.е. к n+1. Переписать все столбцы до столбца с отрицательными элементами. И в столбец k+1 всем элементам присвоить 0.

[Jeni]

В коде небольшая ошибка. Нужно переделать так

for j:=1 to n do {столбцы}
begin
k:=0;
for i:=1 to m do {строки}
if A[j,i]<0 then k:=k+1;
if k=m then .....
end;

А иначе, k будет учитывать все отрицательные значения в любых столбцах.
Или нужен сам алгоритм вставки нового столбца?

[Stas)))]

да мне как раз необходим алгоритм вставки а также перезапись всех остальных столбцов со смещением на один.....