begin 
    comment library 1;
    integer 
        n;
    real 
        r;
    n := 2;
    r := 2.5#n;
    outreal(1, r);
end