PROGRAM LONGREAL(OUTPUT);
VAR LR:REAL;
BEGIN
LR:=1234567898765432123456789876543212345678987654321111111111111111111111111112222222222222222;
WRITELN('LR=',LR);
END.