Código Delphi [-] procedure TForm1.Button1Click(Sender: TObject); var i: real; begin i:=9; showmessage(floattostr(sqrt(i))); end;
procedure TForm1.Button1Click(Sender: TObject); var i: real; begin i:=9; showmessage(floattostr(sqrt(i))); end;