module m;integer X,Y;initial begin
for(;$fscanf(1<<31,"%d%d",X,Y);)$write(Y/10%11?X%10:Y/100);end
endmodule