erro em subtracao

Question

Estou fazendo a subtracao em duas variaveis com conteudo 4,49 e 4,49 eo resultado deveria ser 0 mas esta retornando este resultado 1,77635683940025E-15, alguem sabe o pq disto e como resolver?...

Saggitharius · Answer

TENTE ASSIM :)

procedure TForm1.Button1Click(Sender: TObject);
var
num1, num2, resultado : real;
begin
num1 := 4.49;
num2 := 4.49;
resultado := num1 - num2;
Edit1.Text := FloatToStr(resultado);
end;

Obs: para o computador o Sinal VIRGULA virgula n�o existe, as casas decimais s�o tratadas com o sinal de PONTO, e pode ser ai o seu erro Valeu !!!!

espero ter ajudado... :wink:

Beppe · Answer

[quote:5a02adcc03=�ronaldomr�]Estou fazendo a subtracao em duas variaveis com conteudo 4,49 e 4,49 eo resultado deveria ser 0 mas esta retornando este resultado 1,77635683940025E-15, alguem sabe o pq disto e como resolver?[/quote:5a02adcc03]Deve ser um problema de precis�o(quando vc precisa, naum da certo =P).Tenta coloca as vari�veis como Double ou Extended, ou ainda Currency, se for pra dinheiro....

Aroldo Zanela · Answer

Colega,A representa��o de n�meros reais no computador (representa��o em ponto flutuante) possui limites de alcance e de precis�o, sendo o alcance limitado pelo n�mero de bits do expoente e a precis�o � determinada pelo n�mero de bits da mantissa.Ja falamos recentemente sobre isso aqui, basta utilizar o link acima �pesquisa� para se aprofundar mais no assunto....

F�rum erro em subtracao #221221