매스 매 티카, 29 바이트

산술 솔루션은 어떻습니까?

IntegerExponent[9#+#~Mod~10]&

나는 이것이 간단한 Mathematica 접근 방식을 능가한다는 것을 매우 기쁘게 생각합니다.

설명

코드 자체는 9 * n + n % 10을 계산 한 다음 입력을 나누거나 다시 말해서 0을 세는 최대 10의 거듭 제곱을 찾습니다 . n 이 k의 반복 된 숫자로 끝나는 지 , 9 * n + n % 10 에 k의 후행 0 이 있는지 표시해야합니다 .

담당자 숫자는 99999 ( 10 ⁵ -1 ) 와 같은 숫자 를 9 로 나누고 반복 된 숫자를 곱하여 수학적으로 가장 쉽게 표현할 수 있습니다 . 우리는 쓸 수 있도록 N = 10 m * ^K + D * (10 ^K -1) / 9 , m ≢ D (모드 10) ,되도록 N이 끝나지 않는 더 이상 K 반복 숫자. 참고 D가 N = 10 % .

이것을 우리의 공식 9 * n + n % 10에 연결합시다 . 우리는 9 * m * 10 ^k + d * (10 ^k -1) + d를 얻습니다 . 끝 의 d 는 취소되었으므로 9 * m * 10 ^k + d * 10 ^k = (9 * m + d) * 10 ^k로 남습니다 . 그러나 9 ≡ -1 (mod 10) 이므로 9 * m + d ≡ d-m (mod 10) . 그러나 우리는 m ≢ d (mod 10) 와 d-m ≢ 0 (mod 10) 이라고 주장했습니다 .

다시 말해, 9 * m + d 는 10으로 나눌 수 없으므로 9 * n + n % 10 = (9 * m + d) * 10 ^k 를 나누는 10 의 최대 거듭 제곱 은 k , 후행 반복 자릿수

보너스로이 솔루션 ∞은 input에 대한 올바른 결과를 인쇄합니다 0.

답변

&`(.)\1*$

ẹḅtl

ẹ       Elements: split to a list of digits
 ḅ      Blocks: group consecutive equal digits into lists
  t     Tail: take the last list
   l    Length: Output is the length of that last list

lambda s:len(`s`)-len(`s`.rstrip(`s%10`))

lambda s:len(s)-len(s.rstrip(s[-1]))

a=>a.match`(.)\\1*$`[0].length

f=a=>a.match`(.)\\1*$`[0].length


console.log(f("14892093"));//1
console.log(f("12344444"));//5
console.log(f("112311"));//2
console.log(f("888888"));//6
console.log(f("135866667 "));//1

j,k;f(n){for(k=j=n%10;j==n%10;n/=10,k++);k-=j;}

while($argn[-++$i]==$argn[-1]);echo$i-1;

<?=strlen($a=$argv[1])-strlen(chop($a,$a[-1]));