Como obter os decimais de uma divisão?
Preciso fazer uma divisão e guardar o resultado em uma variavel.
Porem eu preciso dodo inteiro edos decimais tipo
A/B=3,2
c:=A/B Ou seja c:= 3,2.
Qual tipo de ser a variavel se for possivel?
Muito obrigado pela atenção.
Porem eu preciso dodo inteiro edos decimais tipo
A/B=3,2
c:=A/B Ou seja c:= 3,2.
Qual tipo de ser a variavel se for possivel?
Muito obrigado pela atenção.
Carloshenrique
Curtidas 0
Respostas
Marco Salles
04/01/2004
Preciso fazer uma divisão e guardar o resultado em uma variavel.
Porem eu preciso dodo inteiro edos decimais tipo
A/B=3,2
c:=A/B Ou seja c:= 3,2.
Qual tipo de ser a variavel se for possivel?
Muito obrigado pela atenção.
Rapaz Mas Esta Dificil Entender o Que Voce Diz.Quando Um Tópico Fica Muito Tempo Sem Resposta No Forum Na Maior Parte Das Vezez e Devido a Pergunta Ser Formulada Dando Algumas Interpretações.Mas Deixa Eu Ver Se O Que Queres É Isto.Fazer Uma Divisão e Separar a Parte Inteira e a Parte Decimal Desta Divisão.Partindo Deste Preincipio Vou Atacar Sua Dúvida.
Considere
[color=red:4e5e5ae035]Var
a,b:Real;//Pode Ser Inteiro, Nao Tem Problema.
ParteInteira:Integer;
ParteDecimal:Real;
Begin
//Se B <> 0 Then
ParteInteira:=Int(a/b);
ParteDecimal:=(a/b) - ParteDecimal;
end; //Fim Do Código...[/color:4e5e5ae035]
GOSTEI 0
Marco Salles
04/01/2004
Desculpe , Mas Acabei Digitando Errado:
[color=red:279a54e80f]Var
a,b:Real;//Pode Ser Inteiro, Nao Tem Problema.
ParteInteira:Integer;
ParteDecimal:Real;
Begin
//Se B <> 0 Then
ParteInteira:=Int(a/b);
ParteDecimal:=(a/b) - ParteDecimal; *******ERRADO*************
ParteDecimal:=(a/b) - ParteInteira; // Código Correto
end; //Fim Do Código...[/color:279a54e80f]
[color=red:279a54e80f]Var
a,b:Real;//Pode Ser Inteiro, Nao Tem Problema.
ParteInteira:Integer;
ParteDecimal:Real;
Begin
//Se B <> 0 Then
ParteInteira:=Int(a/b);
ParteDecimal:=(a/b) - ParteDecimal; *******ERRADO*************
ParteDecimal:=(a/b) - ParteInteira; // Código Correto
end; //Fim Do Código...[/color:279a54e80f]
GOSTEI 0