Здравствуйте делаю вычисления в таблице по процентам но у меня вылезла ошибка и я не понимаю в чём ее суть procedure TForm1.Label1Click(Sender: TObject);
var i : Integer;
s : Real;
a : array [1..4, 1..2] of real;
begin
s := StrToFloat(Edit1.Text);

a[1,2] := s * (1 + (StrToFloat (StringGrid1.Cells[1,1])/100));
ошибка тут StringGrid.Cells[1,2] FloatToStr (a[1,2]);
for i := 2 to 4 do
begin
a[i,2] := a [i-1,2] * (1 + (StrToFloat (StringGridl.cells[i,1])/100));
StringGridl.Cells[i,2] := FloatToStr (a[i,2]);
end;

end;

настя200336    3   07.04.2021 23:44    1