使用Inno Setup计算平方根

Question

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

Answer 1

在研究了数学领域后，可以进行计算。

//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;