begin 

    comment library 1;

    integer 
        i,
        j;
    i := 3;
    j := - 2;
    outreal(1, (81 * i^j) % 2);
end