Здравствуйте делаю вычисления в таблице по процентам но у меня вылезла ошибка и я не понимаю в чём ее сутьprocedure TForm1. Label1Click(Sender: TObject);var i : Integer;s : Real;a : array [1. . 4, 1. . 2] of real;begins := 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 dobegina[i,2] := a [i-1,2] * (1 + (StrToFloat (StringGridl. cells[i,1])/100));StringGridl. Cells[i,2] := FloatToStr (a[i,2]);end;end;