begin
comment set selected bit to 0;
	bits bt, b1;
	integer n;
	n := 12;
	bt := #12ab34cd;
	write(bt);
	b1 := #1 shl n;
	b1 := ~b1;
	bt := bt and b1;
	write(bt);
end.