character c;1 n=i>64.and.i<91;call fget(c,k);i=ichar(c);if(i>10)i=xor(i,n*32);print'(a1$)',i;goto(1)1-k;end