Problems with REAL type

[txb]

Please help me.
2 problems in comments

program MyProject;
var
variable1: real;
begin
variable1 := 999999.98; // in fact 1000000 ! but must be (need) 999999.98
while true do
variable1 := variable1 + 0.01; // not woked ! variable1 remains equal to the value assigned before the cycle.
end.

PS: PIC16F877A, 20MHz, CONFIG : $2007 : 0x0F02, build type: release, optimization level: 0

[janni]

Floating point types have finite accuracy. Variable of type real is 32-bit long which leads at most to 7 accurate digits.

[txb]

Damn It. I knew.
Thank U

(translated from russian to english in google com)

[filip]

Hi,

Please, use English language only in the Forum.

Thank you for the understanding.

Regards,
Filip.