Oef : Schrijf een programma dat een reëel getal afleest en daarna de getallen voor en de getallen na de komma apart weergeeft. (Maak gebruik van ENTIER)
Dit heb ik tot nu toe :
PROCEDURE Oef6*();
VAR
x, nakomma, eenheden: REAL;
BEGIN
In.Open();
In.Real(x);
eenheden := ENTIER(x);
In.Real(x);
nakomma := x-ENTIER(x);
OutExt.String("Aantal eenheden dat uw getal bevat: ");
OutExt.RealFix(eenheden,0,0);
OutExt.Ln();
OutExt.String("Dit zijn de getallen na de komma: ");
OutExt.RealFix(nakomma, 0,5);
OutExt.Ln();
END Oef6;
En ik krijg als output voor bij 12,12345 :
Aantal eenheden dat uw getal bevat : 12.
Dit zijn de getallen na de komma: 0.0000
Terwijl ik dan toch 0.12345 zou moeten krijgen, aangezien x - [x] = de getallen na de komma van x?
Zou iemand kunne helpen =D?