Jump to content
Firewall

Formula Porcentagem

Recommended Posts

Firewall

Olá a todos, bem hoje esotu a procura de 1 formula que está me quebrando a cabeça.

Só para relembrar eu sou programador java...estou peganod pascla , pelo motivo de que o professor pedio que fizessemos com a linguagem Pacal =(

Bem..não fiquem (ohhh) umas d aprimeiras vezes que me comunico com pascal.. minha noção d ecodigos do memso não é grande.

Begin.

Estou quebrnaod a cabeça já faz 3 dias...preciso de 1 formula que entenda porcentagem! ( voçê deve se perguntarmas como assim?)

eu quero que, quando a pessoa digite 5 , o programa reconheça como 5%. ou seja uma demonstração.

exmeplo:

writeln('Informe Modelo do Carro 1');

readln(carmodel1).

writeln('Informe Valor do Carro 1');

readln('carsale1');

writeln('Informe a porcentagem de aumento que deseja aplicar no preço do carro 1');

readln('porcentagem1');

formula := ??? ??? ??? ?????? ???

e agora como faço a formula pra quando a pessoa digitar qualquer valor e faça esse valor virar uma porcentagem, e que aumente essa porcentagem no valor do veiculo

Share this post


Link to post
Share on other sites
bubulindo

Percentagem = Y%

Y/100

preco do veiculo = X

preco do veiculo + percentagem Y = preco do veiculo * ( 1 + Y/100)

Exemplo:

Percentagem = 20%

20/100 = 0.2

preco do veiculo = 100

preco do veiculo + percentagem = 100 *(1 + 0.2) = 120


include <ai se te avio>

Mãe () {

}

Share this post


Link to post
Share on other sites
Firewall

Percentagem = Y%

Y/100

preco do veiculo = X

preco do veiculo + percentagem Y = preco do veiculo * ( 1 + Y/100)

Exemplo:

Percentagem = 20%

20/100 = 0.2

preco do veiculo = 100

preco do veiculo + percentagem = 100 *(1 + 0.2) = 120

Primeiramente obrigado por me responder...

só que o unico problema é como que o pascal vai entender que 20 é porcentagem? eu digito 20 e ele automaticamente vai reconheçer como porcentagem?

pq se eu por y : real e juntando com sua formula ficaria assim:

preço do veiculo + porcentagem = 100 *(1 + 0.2) = 120

o resultado seria:

supendo que o preço veiculo seria: 100

porcentagem:100

seria assim:

100 + 100 = 100* (1 + 0.2) = 120

o unico chato da historia é pq o pascal noa aceita porcentagem =(  ,

Share this post


Link to post
Share on other sites
pmg

Em Java podes fazer

valor = 250;
porcentagem = 20;
var = valor * porcentagem%;

?????

E obter 50 em var? ???


What have you tried?

Não respondo a dúvidas por PM

A minha bola de cristal está para compor; deve ficar pronta para a semana.

Torna os teus tópicos mais atractivos e legíveis usando a tag CODE para colorir o código!

Share this post


Link to post
Share on other sites
Firewall

Em Java podes fazer

valor = 250;
porcentagem = 20;
var = valor * porcentagem%;

?????

E obter 50 em var? ???

SIm estás correto pra java ; mas o unico problema que preciso uma formula para PASCAL  =)

Share this post


Link to post
Share on other sites
bsccara
var
  carmodel1 : string;
  carsale1 : integer;
  porcentagem1 : integer;
begin
  writeln('Informe Modelo do Carro 1');
  readln(carmodel1).
  writeln('Informe Valor do Carro 1');
  readln(carsale1);
  writeln('Informe a porcentagem de aumento que deseja aplicar no preço do carro 1');
  readln(porcentagem1);
  formula := carsale1 * (100 + porcentagem1) / 100;
end;

Share this post


Link to post
Share on other sites
bubulindo

Primeiramente obrigado por me responder...

só que o unico problema é como que o pascal vai entender que 20 é porcentagem? eu digito 20 e ele automaticamente vai reconheçer como porcentagem?

pq se eu por y : real e juntando com sua formula ficaria assim:

preço do veiculo + porcentagem = 100 *(1 + 0.2) = 120

o resultado seria:

supendo que o preço veiculo seria: 100

porcentagem:100

seria assim:

100 + 100 = 100* (1 + 0.2) = 120

o unico chato da historia é pq o pascal noa aceita porcentagem =(  ,

200 != 120 :S Não sei onde foste ver essa lógica.

Percentagem é um conceito. Para o PASCAL é indiferente se é percentagem, permilagem ou qualquer outra ...agem. É tudo baseado numa fórmula matemática. Basicamente dividindo por 100 obténs percentagem, por mil, permilagem.

Logo o PASCAL não tem de entender o que é percentagem... tu é que tens.


include <ai se te avio>

Mãe () {

}

Share this post


Link to post
Share on other sites
Firewall

var
  carmodel1 : string;
  carsale1 : integer;
  porcentagem1 : integer;
begin
  writeln('Informe Modelo do Carro 1');
  readln(carmodel1).
  writeln('Informe Valor do Carro 1');
  readln(carsale1);
  writeln('Informe a porcentagem de aumento que deseja aplicar no preço do carro 1');
  readln(porcentagem1);
  formula := carsale1 * (100 + porcentagem1) / 100;
end;

Muito obrigado; solucionou o meu problema

Logo logo quando eu terminar minha aplicação em pascal; irei mostrar 3 programinhas basicos ques poderão ser de alguma utilidade ^^

Share this post


Link to post
Share on other sites
thoga31

Mesmo com o problema resolvido (bandeja), eu vou responder.

O Pascal não tem uma fórmula para a percentagem, já que ela é uma forma de representar uma parte de um todo.

O todo é representado pela unidade, 1. Metade do todo será 0,5. A percentagem será 50%. O que significa? 50% diz directamente "50 partes em 100".

Tens também a permilagem, pelo que neste caso seria 500 pormil, ou seja, "500 partes em 1000".

Para aumentar o preço em 20%, por exemplo, fazes preço*1.2, ou seja, em cem partes do preço acrescentas 20 partes dele - aumentar 20% significa 120% do preço inicial.

Para o teu caso, fazes o seguinte:

write('Preco inicial: ');
readln(PrecoInicial);
repeat
      write('Percentagem de afectacao (-100 a 100%): ');
      readln(percentagem);
until (percentagem in [-100, 100]);
PrecoFinal := PrecoInicial * (1 + (percentagem / 100));
writeln('Preco final = ', PrecoFinal);

Um último conselho: antes de procurarem funções pré-feitas, tentem entender o conceito por detrás de cada problema e tentem criar métodos para os resolver - é uma excelente forma de se aprender. E, neste caso, a percentagem é algo banal que só envolve uma divisão por 100.

Cumprimentos.


Knowledge is free!

Share this post


Link to post
Share on other sites
Firewall

Mesmo com o problema resolvido (bandeja), eu vou responder.

O Pascal não tem uma fórmula para a percentagem, já que ela é uma forma de representar uma parte de um todo.

O todo é representado pela unidade, 1. Metade do todo será 0,5. A percentagem será 50%. O que significa? 50% diz directamente "50 partes em 100".

Tens também a permilagem, pelo que neste caso seria 500 pormil, ou seja, "500 partes em 1000".

Para aumentar o preço em 20%, por exemplo, fazes preço*1.2, ou seja, em cem partes do preço acrescentas 20 partes dele - aumentar 20% significa 120% do preço inicial.

Para o teu caso, fazes o seguinte:

write('Preco inicial: ');
readln(PrecoInicial);
repeat
      write('Percentagem de afectacao (-100 a 100%): ');
      readln(percentagem);
until (percentagem in [-100, 100]);
PrecoFinal := PrecoInicial * (1 + (percentagem / 100));
writeln('Preco final = ', PrecoFinal);

Um último conselho: antes de procurarem funções pré-feitas, tentem entender o conceito por detrás de cada problema e tentem criar métodos para os resolver - é uma excelente forma de se aprender. E, neste caso, a percentagem é algo banal que só envolve uma divisão por 100.

Cumprimentos.

obrigado Thoga31...

mas eu recori ao fórum, porque já estava a muito tempo procurando uma formula para essa solução..sobre a formula que o nosso caro membro me disponibilizou, eu entendi completamente,

a minha formula anterior era quase está, veja a minha formula que estava batendo a cabeça.

aumenta1 := carsale1 * (1000 + porcentagem)/100;

e a unica infeliz diferença foi a de 100 =(

eu nunca té hoje peguei uma formula pronta; graças ao meu professor; ele fala se quer se rum bom programador faça voçê mesmo tire duvidas,conheça,aprenda.

Share this post


Link to post
Share on other sites
thoga31

eu nunca té hoje peguei uma formula pronta; graças ao meu professor; ele fala se quer se rum bom programador faça voçê mesmo tire duvidas,conheça,aprenda.

Não podia estar mais de acordo. ;)

Quanto à tua ideia, de facto bastava substituir o 1000 por 100 e terias exactamente o mesmo.


Knowledge is free!

Share this post


Link to post
Share on other sites
Firewall

200 != 120 :S Não sei onde foste ver essa lógica.

Percentagem é um conceito. Para o PASCAL é indiferente se é percentagem, permilagem ou qualquer outra ...agem. É tudo baseado numa fórmula matemática. Basicamente dividindo por 100 obténs percentagem, por mil, permilagem.

Logo o PASCAL não tem de entender o que é percentagem... tu é que tens.

200 != 120 :S Não sei onde foste ver essa lógica.

Isto foi a formula que o usuario pmg disse...

e eu respondi que  ão estava de acordo  '-' , voçê deve ter entendido errado, eu fui explicar =)

Share this post


Link to post
Share on other sites
pmg

Isto foi a formula que o usuario pmg disse...

Eu so fiz uma pergunta. Nunca referi formula nenhuma.

Entretanto andei a experimentar o uso do % como na minha pergunta e nao consegui po-lo a funcionar ;)


What have you tried?

Não respondo a dúvidas por PM

A minha bola de cristal está para compor; deve ficar pronta para a semana.

Torna os teus tópicos mais atractivos e legíveis usando a tag CODE para colorir o código!

Share this post


Link to post
Share on other sites
thoga31

Entretanto andei a experimentar o uso do % como na minha pergunta e nao consegui po-lo a funcionar ;)

Colocaste o % em Pascal ou em Java?


Knowledge is free!

Share this post


Link to post
Share on other sites
pmg

Em Java ... mas nao como operador de modulo

Tentei como "operador de percentagem", depois da sugestao de que funcionaria

Nota: este é o meu primeiro programa em Java. Nao conheco de todo esta linguagem.

import java.util.*;
import java.lang.*;

class Main
{
public static void main (String[] args) throws java.lang.Exception
{
	int a, b, c;
                a = 1500;
                b = 20;
                c = a * b%;
                System.out.println(c);
}
}

O compilador do ideone diz que é ilegal ( http://ideone.com/ac4XO ) ?????


What have you tried?

Não respondo a dúvidas por PM

A minha bola de cristal está para compor; deve ficar pronta para a semana.

Torna os teus tópicos mais atractivos e legíveis usando a tag CODE para colorir o código!

Share this post


Link to post
Share on other sites
nunopicado

function Percent(Taxa:integer; PlusOne:Boolean):Real;
begin
   Percent:=Taxa/100;
   if PlusOne then Percent:=Percent+1;
end;

PVP:=Preco*Percent(20,True);


"A humanidade está a perder os seus génios... Aristóteles morreu, Newton já lá está, Einstein finou-se, e eu hoje não me estou a sentir bem!"

> Não esclareço dúvidas por PM: Indica a tua dúvida no quadro correcto do forum.

Share this post


Link to post
Share on other sites
thoga31

Em Java ... mas nao como operador de modulo

Tentei como "operador de percentagem", depois da sugestao de que funcionaria

Nota: este é o meu primeiro programa em Java. Nao conheco de todo esta linguagem.

[...]

O compilador do ideone diz que é ilegal ( http://ideone.com/ac4XO ) ?????

No que toca ao Java, aqui não te podemos ajudar. ;)


Knowledge is free!

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now

×
×
  • Create New...

Important Information

By using this site you accept our Terms of Use and Privacy Policy. We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.