begin
integer i,j,k
i=-1; j=32
l1:
k=i>>j
write(k,5)
j=0
l2:
k=i>>j
write(k,5)
endofprogram