codice:
procedure TForm8.Button3Click(Sender: TObject);
begin
var
X,Y,Z:INTEGER;
S:STRING[10];
nDouble: Double;
begin
  VAL(Edit10.text,X,Z);
  nDouble := StrToFloatDef(Edit9.text, 0);
  nDouble := (nDouble * X);
  STR(X,S);
  Label13.Caption := FloatToStr(Round(nDouble));
end;
con il codice sopra riportato effettuo questa formula Watt X Corrente adesso ne vorrei fare la radice qadrata come faccio? Che?!?