Displaying whole number of real variable

[wcccprogramming]

How do I display the whole number of a real variable if the number does not have any decimal places. I need to display the number with decimal places if it has any.

Ex.

3.00 as 3
3.45 as 3.45

 

[lionelhill]

This is actually one of the rare cases where I'd (1) use str to convert the decimal to a string with the largest number of decimal places I will ever need, then (2) check it really is a decimal by making sure pos('.', mystring) is greater than zero (and remember that not all nations use '.' as a decimal). and then (3) chew off zeroes from the right hand side until I meet a decimal point (which should also be chewed) or a non-zero digit.

But there's probably a simpler way.

 

[Bertv100]

I think that would indeed be the best way to do it; One remark though, I think Borland Pascal always uses a dot as decimal separator, regardless of any system configuration.


Regards,
Bert Vingerhoets
vingerhoetsbert@hotmail.com

http://student.vub.ac.be/~bvingerh/

Don't worry what people think about you. They're too busy wondering what you think about them.

 

[dkdude]

... or you can use the Int() function to determine how to display the Real:

Function Whole(Source : Real) : Boolean;
Begin
  If (Int(Source) <> Source) then
    Whole := False
  Else
    Whole := True;
End;

Good Luck §;O)


Jakob

 

[wcccprogramming]

Thank you for you help. I will try and use the string solution tonight. Your help is appreciated.