begin
comment
library 1;
integer
i, j; i := 0; j := - 2; outreal(1, i^j)
end