T tseug Unregistered / Unconfirmed GUEST, unregistred user! 2002-11-27 #3 uses math procedure TForm1.Button2Click(Sender: TObject); var x, y, z : do uble; begin x := 10; y := 3; z := Power(x, y); ShowMessage(Format('%f', [z])); x := Exp(Ln(z) / y); ShowMessage(Format('%f', [x])); end;
uses math procedure TForm1.Button2Click(Sender: TObject); var x, y, z : do uble; begin x := 10; y := 3; z := Power(x, y); ShowMessage(Format('%f', [z])); x := Exp(Ln(z) / y); ShowMessage(Format('%f', [x])); end;
B beta Unregistered / Unconfirmed GUEST, unregistred user! 2002-11-27 #4 倒,数学问题也上来了。 不过 tseug 下手也真快:)