'BEGIN'
    'COMMENT' LIBRARY 1;
    'INTEGER'
        I,
        J;
    I := 3;
    J := - 2;
    OUTREAL(99, (81 * I^J) 'DIV' 2);
'END'