Help Porcentagem

Delphi

08/09/2004

Fala Pessoal!
Queria o seguinte:
Vamos dizer que tenho um produto que o preço de custo é de 100 Reais
e vou vende-lo a 150 Reais.
Gostaria de quanto eu digitar o valor de venda me fosse informado quantos porcento estou tendo em cima meu produto.
Desde já valeu.


Debug

Debug

Curtidas 0

Respostas

Oscar Candido

Oscar Candido

08/09/2004

Amigo, espero que seja isso:
   Porcentagem := ((ValorVenda - Preco) * 100) / Preco;

espero ter ajudado
Um abraço


GOSTEI 0
Emerson Nascimento

Emerson Nascimento

08/09/2004

uma outra forma:

Porcentagem := ((ValorVenda / Preco) - 1) * 100;

Se o preço é R$ 80 e vc vende a R$ 72 o resultado é -10 (foi dado um desconto de 10¬). Se o preço é R$ 80 e você vende a 96, terá como resultado 20 (acréscimo de 20¬). Ou seja: números negativos indicam desconto, enquanto números positivos indicam acréscimo, da mesma forma que na função passada pelo oscar candido.


GOSTEI 0
POSTAR