Alguem Pode Me Ajudar Com Um Algoritmo

[viniciusgaudio]

Fala aí galera!

to com um algoritmo que eu não consigo resolver o problema e esse.

Construa um algoritmo para ler um número real e imprima o número lido, a parte inteira e a parte decimal.

Exemplo: número lido: 421,76

parte inteira: 421

parte decimal: 0,76

desde ja agradeço

[warlockplus]

opa,

transforme o numero lido em string, feito isso percorra ate achar a virgula e/ou ponto. Feito isso transforme a parte antes da string na parte inteira e a parte depois da string na decimal.

ai so imprimir.

[andre._]

muito mais simples:

leia a var, depois;

(float)(f - (int)f) /* f seria a var */ isso é o dps da virgula

depois imprima a var.

[viniciusgaudio]

pow andre nao entendi muito o comando você pode me explicar???

Falou

[viniciusgaudio]

Fala galera!!!

Se alguem dizer outro tipo de solução

por favor postem. Pois ainda nao consegui resolver

Desde já agradeço

[warlockplus]

Ai isso e mais ou menos o que eu tinha te dito antes mais tem que fazer alguns ajustes é uma coisa mais genérica, feito a unha, mais as linguagens traz funções para isso, exemplo em Pascal:

write( 'Digite o numero: ' ); readln( num );

str( num, numString );

for i := 1 to length( numString ) do

begin

if( numString[ i ] = '.' ) then

begin

writeln( 'Parte inteira: ' + aux);

aux := '0.'

end

else aux := aux + numString[ i ];

end;

val( aux, num, i );

writeln( 'Parte fracionaria: ', num:0:9 );

E com funções da linguagem a ser usada fica bem mais fácil:

Ex.:

writeln( 'Digite o n£mero: ' ); readln( num );

parteInt := Int( num );

parteFrac := Frac( num );

writeln( parteint:0:0, ' ', parteFrac:0:9 );

Este exemplo foi em Pascal porque geralmente os cursos fazem uma abordagem inicial com o ela e também por eu achar essa linguagem sensacional pela clareza que ela emprega. Foi considerado uma precisão de 9 casas para a parte decimal.

Diga se é isso ai que você precisa?

abraço.

[viniciusgaudio]

mtu obrigada warlockplus,

me ajudou mtu

agradeço

[viniciusgaudio]

Gostaria de fazer um portugol.

Ja consegui fazer isso

Só não sei como separar a parte decimal do numero real.

Programa Num_Real

Var

n,pdec:real;

pint:inteiro;

Inicio

imprima("Dgite um numero real: ");

leia(n);

pint:=trunca(n);

pdec:=

imprima("o numero real é ",n, "a parte inteira é ",pint, " e a parte decimal é", pdec);

Fim.

Desde ja agradeço a todos q puderem me ajudar