Вивести до друку елементи матриці A(i,i)<=4.

[vodafone-isq]

Пожалуйста помогите с написанием алгоритма вычислений!
Элементы,я так понял, нужно вывести в StringGrid2. Заранее благодарю!

[Novi4ok_11]

for i:=1 to n do 
begin
if a[i,i]<=4 then Label1.Caption:=Label1.Caption+inttostr(a[i,i]);
end;

[Mad_Cat]

вывести в StringGrid2

k:=0;
for i:=1 to n do 
if a[i,i]<=4 then begin stringgrid2.cells[k,0]:=floattostr(a[i,i]);k:=k+1;end;

[Novi4ok_11]

можно и в ListBox мне показалось авторк всеравно)