소개

밑 10에서, Champernowne 상수는 연속 정수의 표현을 연결하여 정의됩니다. 기본 10에서 : 0.1234567891011121314151617...등등.

첫 번째 출현이 10 진수 로 15시작되는 것을 볼 수 있습니다 20th.

  Position
  0000000001111111111222222222233333333334444444444555555555566666666
  1234567890123456789012345678901234567890123456789012345678901234567
                     ^
0.1234567891011121314151617181920212223242526272829303132333435363738...
                     ^^
                     15 = position 20

첫 번째 출현은 소수 45에서 시작합니다 4th.

  Position
  0000000001111111111222222222233333333334444444444555555555566666666
  1234567890123456789012345678901234567890123456789012345678901234567
     ^
0.1234567891011121314151617181920212223242526272829303132333435363738...
     ^^
     45 = position 4

따라서 작업이 쉽습니다. 음수가 아닌 정수가 주어지면 Champernowne 상수의 정수 위치를 출력하십시오.

규칙

• 기능이나 프로그램을 제공 할 수 있습니다
• 이것은 code-golf 이므로 바이트 수가 가장 적은 제출이 승리합니다!

테스트 사례

Input: 20
Output: 30

Input: 333
Output: 56

Input: 0
Output: 11 (note that the 0 before the decimal point is ignored)

Input: 2930
Output: 48

답변

hxjkS+QT`Q

a=prompt();for(y=b=" ";y<a+11;)b+=++y;alert(b.indexOf(a))

a#b|and$zipWith(==)a b=1|1<2=1+a#tail b
(#(show=<<[1..])).show

->n{[*0..n+10]*''=~/\B#{n}/}

1+1oU+B ¬bU

1+1oU+B ¬ bU
1+1oU+B q bU  // Implicit: U = input integer
  1oU+B       // Generate the range [0, U+11).
        q bU  // Join and take the index of U.
1+            // Add one to get the correct result.
              // Implicit: output last expression

s=""for i=1,1e4 do s=s..i end print(s:find(io.read()))