begin

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