Fórum exponenciacao #152175

Em delphi 5.0, use a função POWER:

[b:1b1942c6d6]function Power(Base, Exponent: Extended): Extended;[/b:1b1942c6d6]

Exemplo:

Uses Math;

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
Edit3.Text := FormatFloat(´0.0000000000´,Power(StrToInt(Edit1.Text),StrToInt(Edit2.text)));
end;