begin 

    comment library 1;
    integer 
        i,
        j;
    i := 2;
    j := 3;
    outreal(1, i^j % j)
end