0

如何在 Inno Setup 中计算数字的平方根?

4

1 回答 1

4

在学了一点数学领域之后,可以做计算了。

//Sqtr calc
Function SqtrCalc(n : Single) : Single;
Var
  I: Integer;
  y: Single;
Begin
  y := n;  

  for I := 0 to 9 do
    begin
      y := y / 2 + n / (2 * y);
    end;

  Result := y;
End;
于 2013-05-26T17:40:55.947 回答