Document

ParteDecimal( ) - função ParteDecimal() retorna a parte decimal de seu argumento, isto é, os dígitos inteiros são ignorados.

Ela é chamada com a sintaxe N := ParteDecimal ( exprN );

Veja o exemplo abaixo:

inicio
inteiro s;
real n;
escreva("digite qualquer número: ");
leia(n);

S := ParteDecimal(n);

imprima("Foi digitado o número", n, “e sua parte decimal é”, S);
fim

Exemplo com as duas funções:

inicio
inteiro s, p;
real n;
escreva("digite qualquer número: ");
leia(n);

P := ParteDecimal(n);
S := ParteInteira(n);

imprima("Foi digitado o número", n, “e sua parte inteira é ”, S, “e sua parte decimal é “, P);
fim