1 read*,n;n=2**and(n-1,31);print'(i0" to "i0)',-n,n-1;goto1;end