среднее значение столбца в StringGrid

[Алекссс]

есть стринггрид и 5 столбцев. в 4 нужно посчитать среднее значение по всему столбцу и вывести в идит. не могу сообразить столько литературы перелопатил уже думал сумму делить на количество строк((( не катит. скажите плз. количество строчем может быть разным

[Stilet]

with StringGrid do begin tag:=0;
 for i:=0 to RowCount-1 do tag:=tag+StrtoIntDef(cells[i,Номер колонки],0);
 Результат:=1.0*tag/RowCount;
end;

Так понятнее?

[phomm]

Stilet, пример хороший ) только разве что мозговзрывной для новичка.
Можно ли пояснить сакраментальный смысл умножения на 1.0 ? это же не питон какой... (пока только предполагаю, что нечто вроде защиты на этапе компиляции)

Ну, а Вам, ТС, совет, если Вы написали код, а он ведёт себя не так, как Вы ожидали, не надо писать про литературу, что и как Вы пытались сделать, что катит, выбивает, вылетает, ругается, глючит. Просто "show me the code" - покажите код, там разберёмся.

Я могу только накропать простенькую функу для Вас (она вдобавок учитывает количество фиксированных строк):

function GetAvgOfCol(SG: TStringGrid; ACol: Integer): Double;
var
  i : Integer;
begin
  Result := 0;
  for i := SG.FixedRowCount to SG.RowCount - 1 do
    Result := Result + StrtoIntDef(SG.Cells[i, ACol],0); // честно стибрил преобразование у Stilet
  Result := Result / (SG.RowCount - SG.FixedRowCount);
end;

[Stilet]

Можно ли пояснить сакраментальный смысл умножения на 1.0 ?

Tag - свойство integer; Я не знаю как компиль себя поведет, ведь он должен определять тип выражения по первому операнду.

[Аватар]

Есть деление int на int - результат в любом случае будет вещественный

[Stilet]

результат в любом случае будет вещественный

Верно подмечено