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