$810=0 while(A[$810/10+1,$810%10+1]==B[$810/10+1,$810%10+1]) $810=$810+1 end return($810/10+1,$810%10+1)