Как в Делфи в таблице TStringGrid подсчитать среднее арифметическое первой строки если дан массив 10*10

procedure TForm1.Button1Click(Sender: TObject);var  i: Integer;  s: Integer;  Average: double;begin  s:=0;  for i := 1 to 10 do    s := s + StrToInt(StringGrid1.Cells[1,i]);  Average:=s/10;  //Естественно в сроке StringGrid1.Cells[1,i] изначально должны быть данные, иначе произойдёт исключительная ситуацияend;