F�rum Arcotengente com resultado errado. #390572

16/11/2010

Aos amigos do Delphi, Estou tentando calcular o arcotangente mas o resultado d� incorreto. procedure TRaizQuadr.BitBtn4Click(Sender: TObject);
var
T: Extended;
begin
T := arcTan(6);
edit8.Text := FloatToStr(T);
end; Se puderem me ajudar desde j� eu agrade�o.

Valdir Lima

Curtir t�pico

+ 0

Responder

Posts

16/11/2010

Leonardo Xavier

Provavelmente o erro deve estar na fun�ao ARCTAN teria como vc postar ela aqui? Ou voc� ja realizou uma revis�o nesta fun�ao?

Responder

Gostei + 0

16/11/2010

Pietro Braga

Aos amigos do Delphi,

Estou tentando calcular o arcotangente mas o resultado d� incorreto.

procedure TRaizQuadr.BitBtn4Click(Sender: TObject);
var
T: Extended;
begin
T := arcTan(6);
edit8.Text := FloatToStr(T);
end;

Se puderem me ajudar desde j� eu agrade�o.

ArcTan � uma fun��o da System...
Fa�a assim:

procedure TRaizQuadr.BitBtn4Click(Sender: TObject);
var
T: Single;
begin
   T := arcTan(6);
   edit8.Text := FloatToStr(T);
end;

Responder

Gostei + 0

16/11/2010

Leonardo Xavier

Aos amigos do Delphi,

Estou tentando calcular o arcotangente mas o resultado d� incorreto.

procedure TRaizQuadr.BitBtn4Click(Sender: TObject);
var
T: Extended;
begin
T := arcTan(6);
edit8.Text := FloatToStr(T);
end;

Se puderem me ajudar desde j� eu agrade�o.

ArcTan � uma fun��o da System...
Fa�a assim:

procedure TRaizQuadr.BitBtn4Click(Sender: TObject);
var
T: Single;
begin
   T := arcTan(6);
   edit8.Text := FloatToStr(T);
end;

Muito interessante nao sabia disso.

Responder

Gostei + 0

16/11/2010

Leonardo Xavier

De uma olhada neste site e veja se ajuda.

Responder

Gostei + 0

17/11/2010

Valdir Lima

Ok, muito obrigado pela ajuda, consegui montar a f�rmula e funcionou. Abra�o. Valdir Lima

Responder

Gostei + 0