Partie avant la virgule. [Résolu]

Messages postés
116
Date d'inscription
dimanche 12 décembre 2004
Dernière intervention
25 septembre 2005
- 8 sept. 2005 à 21:20 - Dernière réponse :
Messages postés
1651
Date d'inscription
samedi 10 juillet 2004
Dernière intervention
25 juillet 2014
- 8 sept. 2005 à 22:43
Salut les gars,



Je voudrai savoir comment on fait lorsqu'on a le résultat d'une
division de ne récupérer que la partie avant la virgule. De même pour
la partie après la virgule.



Désolé pour la question toute bête.


-----------------------------------------

May Delphi and Php change the world ....
Afficher la suite 

Votre réponse

3 réponses

Messages postés
1651
Date d'inscription
samedi 10 juillet 2004
Dernière intervention
25 juillet 2014
8 sept. 2005 à 21:40
0
Merci
salut
utilise la fonction trunc() pour la partie entiere et la fonction fract pour la partie decimale
function Trunc(X: Extended): Int64;


Description


Dans le code Delphi, la fonction Trunc tronque une valeur de type réel en valeur de type entier. X est une expression de type réel. Trunc renvoie une valeur Int64 qui correspond à la valeur arrondie de X (vers zéro).


function Frac(X: Extended): Extended;


Description


Dans le code Delphi, la fonction Frac renvoie la partie décimale de l'argument X.


X est une expression de type réel. Le résultat est la partie décimale de X ; c'est-à-dire Frac(X) = X - Int(X).

bonne prog.
Commenter la réponse de jlen100
Messages postés
116
Date d'inscription
dimanche 12 décembre 2004
Dernière intervention
25 septembre 2005
8 sept. 2005 à 22:09
0
Merci
Ok mais comme j'ai pas l'habitude de travailler avec les fonctions,tu
peux me détailler ca un peu plus, stp. Merci pour tout.

-----------------------------------------

May Delphi and Php change the world ....
Commenter la réponse de Becracker
Messages postés
1651
Date d'inscription
samedi 10 juillet 2004
Dernière intervention
25 juillet 2014
8 sept. 2005 à 22:43
-2
Merci
var
V1,V2, R: Real;
begin
V1:=257.912;
V2:=V1/2;
R := Frac(V2); { 0.456 }
R:=trunc(V2);{123}
end;
bonne prog
Commenter la réponse de jlen100

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.