Программа по двумерным массивам!

[Elmander]

Кто-нибудь может помочь с написанием проги на Delphy:
В заданной матрице A=(aij)45 найти нулевой элемент с найбольшим значением индекса i и все элементы столбца, в котором находится этот элемент обнулить. Если в матрице нет нулевых элементов, отпечатать соответствующее сообщение.

[Jeni]

Сообщение от Elmander

В заданной матрице A=(aij)45...

Что это за странная такая матрица?

P.S. На будущее, нет такого языка "Delphy" и никогда не было. Ладно уж информатика не по силам, но хоть название языка можно было выучить?

[Alex21]

Когда же вы научитесь правильно переписывать условия???

[Elmander]

Че вы напали?! Читать я слава Богу пока умею! И переписал все точно так как дано. Только символы ij и 45 - маленькие.

[AVer]

Сообщение от Jeni

Что это за странная такая матрица?

a - название массива
i, j - размерность

[Elmander]

Сообщение от AVer

a - название массива
i, j - размерность

Да ij - размерность, а что такое тогда 45?

[Carbon]

А может, размер массива?

[D-mon]

Если я правильно понял условие это будет выглядеть примерно так:
Procedure TForm1.FindEl;
Var maxInd:integer;
a:array[0..44]of integer;
begin
maxInd:=-1;
for i:=0 to 44 do
begin
for j:=0 to 44 do
begin
if(a[i,j]=0)then maxInd:=i;
end;
end;

if(maxInd<>-1)then
begin
for i:=0 to 44 do
begin
a[i,maxInd]:=0;
end;
end
else ShowMessage('Нет нулевых значений');

end;

[Alex21]

D-mon
И все-таки это матрица:

a:array[0..44,0..44]of integer;

[D-mon]

Ошибся в объявлении, но код для
a:array[0..44,0..44]of integer;