Código Delphi [-] var valor : Extended; begin valor := Cos(3.456); Label1.Caption := FloatToStr(valor);
var valor : Extended; begin valor := Cos(3.456); Label1.Caption := FloatToStr(valor);