Pretendo demonstrar neste artigo Tips como separar a parte inteira e a parte fracionária de valores do tipo real. Por exemplo, dado o valor de entrada 147.89 obter como resultados: 147 e 89, separadamente.

Em aplicações Delphi:

Usar as funções:

  1. trunc (trunca um valor real para um valor inteiro);
  2. frac (retorna a parte fracionária de um número real);
  3. round (retorna o valor real arredondado para o número inteiro mais próximo).

As três funções citadas estão disponíveis na unit System, veja o exemplo a seguir:

var  valor: real;
    result: integer;
begin
  valor := 147.89;

// separando a parte inteira: resultado 147
  result := trunc(valor);

// separando a parte fracionária:
// multiplicar por 100 obtem as duas primeiras casas decimais
// resultado 89
  result := round(frac(valor) * 100);
end;

Em aplicações Java:

  1. Fazer o cast de double para int;
  2. Usar o método round da classe Math que retorna o valor real arredondado para o número inteiro longo mais próximo.

Veja o exemplo a seguir:

double valor;
int result;
     
valor = 147.89;

// separando a parte inteira: resultado 147
result = (int)valor;

// separando a parte fracionária:
// valor original é subtraído pela parte inteira
// multiplicar por 100 obtem as duas primeiras casas decimais
// resultado 89
result = (int)Math.round((valor - (int)valor) * 100);

Links Úteis

  • Um bate-papo sobre o Delphi:
    O Delphi está em constante evolução e com ele podemos criar aplicações desktop, servidores de aplicações, aplicativos móveis, entre outros.
  • Enums no Java:
    Aprenda nesse microexemplo como criar e utilizar enums no Java. Confira como esse poderoso recurso permite a definição de um conjunto limitado de valores para uma variável.

Saiba mais sobre Delphi ;)

  • Começando no Delphi:
    Neste Guia de Referência você encontrará o conteúdo que precisa para iniciar seus estudos em Delphi, uma plataforma para desenvolvimento de aplicativos completa, principalmente para soluções desktop e mobile.
  • Curso de Delphi para Iniciantes:
    Este curso como o nome sugere é destinada a todas as pessoas que desejam aprender a desenvolver utilizando o Delphi como ferramenta de desenvolvimento e linguagem de programação.
  • Todos os cursos de Delphi:
    Confira os cursos que a DevMedia preparou para você se tornar um programador Delphi completo. Aprenda a desenvolver aplicações desktop, web e mobile utilizando o VCL, FireMonkey, FireDac e mais.