[fpc-pascal] Why this evaluates on "if" wrong ?

Marco van de Voort marcov at stack.nl
Sun Oct 28 20:41:47 CET 2007


> > Regarding the $3000 computer: An extended has 20 digits of precision. 
> > Make sure you round your output to 10 digits and you need to a very weird 
> > calcation until you can see a rounding difference :) 
> 
> I was talking about $3000 pascal dollars:
> 
> BEGIN
>   writeln($3000);
> END.
> 
> Output:
> 12288
> 
> The Pascal dollar is worth a lot more than you think.

It shows the current weak state of the dollar.  Look what 3 and an half euro
is worth nowadays:

  writeln(3E5:10:3);

:-)



More information about the fpc-pascal mailing list