Programação em Delphi

[diano 0]

Imaginem duas caixas de texto: edit1 e edit2Quero elevar o conteúdo do edit1 pelo conteúdo do edit2Mas naum consigo e meu professor disse que não vai falar, so me deu uma dica, disse que eu tenho que usar o comando Sqr.me ajudem por favor vale nota!!!

[whoami 0]

procedure TForm1.btnexpClick(Sender: TObject);beginn1 := strtofloat(txtr1.text);n2 := strtofloat(txtr2.text);lblresultado.caption:= floattostr(Power(n1,n2));end;

n1, n2 -> variáveis tipo floatlblresultado -> label onde aparecerá o resultadotxtr1, txtr2 -> os dois editsPower -> a função q faz a mágicaobs: ñ se esqueça de declarar q você usará a "extensão" Math do delphi, você vai colocála nessa linha, bem no começo da UNit

uses  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,  StdCtrls, Buttons, Math;