'BEGIN'
    'INTEGER'
        I;
    'REAL'
        X;
    I := 0;
    X := 0.0;
    OUTREAL(99, X^I)
'END'