Ви повинні написати програму або функцію, яка задала початковий порядок виразних одноцифрових натуральних чисел та довжину треку як вихідних даних або повертає кінцевий порядок чисел.

Вхід [5,1,2,6,7] and 14визначає наступну гонку:

--------------
76215 ->
--------------

Правила перегонів

• Доріжка, яка обертається навколо, і цифри можуть проходити кілька кіл.
• Порядок кроків циклічний і заснований на вихідному положенні. У нашому прикладі 5 1 2 6 7 5 1 2 ....
• У одній позиції не може бути декількох цифр.

• Кожна цифра має швидкість digit_valueкомірки на крок. Обгін цифри або безперервного блоку цифр коштує один додатковий крок. Якщо цифра не має необхідної для цього швидкості, вона зупинятиметься перед (блоком) цифр (ими). Приклади:

  [41   ] => [ 1 4 ]  4 overtakes 1
  
  [2 1  ] => [ 21  ]  2 can only move 1 as it can't move 3 to overtake 1
  
  [4 12 ] => [ 412 ]  4 can only move 1 as it can't move 5 to overtake 12     
  
  [   3 ] => [ 3   ]  3 starting a new lap
  

• Кожна цифра повинна пройти digit_valueкруги, перш ніж вона закінчиться. Коли остання комірка доріжки залишилася, завершено коліну. Готова цифра видаляється зі сліду.

• Зауважте, що цифра може досягти початкового положення кілька разів через крок і виконати кілька кіл.

Вхідні дані

• Список чітких одноцифрових натуральних чисел ( 1..9), що мають принаймні один елемент і одне додатне ціле число, більший, ніж довжина списку, довжина треку.

Вихідні дані

• Перелік цифр у тому порядку, який вони закінчили, у будь-якому однозначному форматі.

Приклади

Покроковий наочний приклад для введення даних starting_order = [5,9,2] and length = 6

295   | Start position
29   5| digit 5 moves
2  9 5| digit 9 moves, finishing lap #1
  29 5| digit 2 moves
 529  | digit 5 moves, finishing lap #1
 52  9| digit 9 moves, finishing lap #2
 5  29| digit 2 moves
   529| digit 5 moves
 9 52 | digit 9 moves, finishing laps #3 and #4
29 5  | digit 2 moves, finishing lap #1
29   5| digit 5 moves
2  9 5| digit 9 moves, finishing lap #5
  29 5| digit 2 moves
 529  | digit 5 moves, finishing lap #2
 52  9| digit 9 moves, finishing lap #6
 5  29| digit 2 moves
   529| digit 5 moves
 9 52 | digit 9 moves, finishing laps #7 and #8
 9 5  | digit 2 moves, finishing lap #2 --> remove 2 from the track
59    | digit 5 moves, finishing lap #3
5     | digit 9 moves, finishing lap #9 --> remove 9 from the track
     5| digit 5 moves
    5 | digit 5 moves, finishing lap #4
      | digit 5 moves, finishing lap #5 --> remove 5 from the track
------
Finish order: 2 9 5

Приклади у форматі Input => Output

[3], 2  =>  [3]

[9, 5], 3  =>  [9, 5]

[5, 9, 2], 6  =>  [2, 9, 5]

[5, 9, 2], 10  =>  [5, 9, 2]

[5, 7, 8, 1, 2], 10  =>  [1, 5, 7, 8, 2]

[5, 1, 6, 8, 3, 2], 17  =>  [1, 6, 8, 2, 3, 5]

[1, 2, 3, 7, 8, 9], 15  =>  [1, 7, 8, 9, 2, 3]

[9, 8, 7, 3, 2, 1], 15  =>  [8, 7, 9, 1, 2, 3]

[1, 2, 3, 4, 5, 6, 7, 8, 9], 20  =>  [1, 2, 3, 4, 5, 6, 7, 8, 9]

[9, 8, 7, 6, 5, 4, 3, 2, 1], 20  =>  [8, 7, 5, 9, 6, 1, 2, 4, 3]

Це код-гольф, тому найкоротший запис виграє.

Рубін 229 236

Це функція, яка приймає два параметри: масив, що представляє цифри, і int, що представляє довжину треку. Він повертає масив, представляючи порядок, в якому цифри закінчують гонку.

F=->d,l{
i=0
t=d.map{|x|[x,d.size-(i+=1)]}
r=[]
d.cycle.map{|n|
t==[]&&break
(c=t.find{|x,_|x==n})&&(s=n
w=c[1]
o=p
(a=(t-[c]).map{|_,p|p%l}
s-=1;w+=1
a&[w%l]==[]?(o=p;c[1]=w):o||s-=o=1)while s>0
c[1]>=n*l&&(t.delete c;r<<n))}
r}

Перевірте це в Інтернеті: http://ideone.com/KyX5Yu

Редагувати: Вигадали кілька хитрощів, щоб зберегти ще кілька символів.

Негольована версія:

F=->digits,length{
  digit_positions = digits.map.with_index{|d,i|[d,digits.size-i-1] }

  result = []

  digits.cycle.map{|n|
    break if digit_positions==[]
    crt = digit_positions.find{|x,_|x==n}
    next unless crt

    steps_left = n
    pos = crt[1]
    taking_over = false

    while steps_left > 0
      other_pos = (digit_positions-[crt]).map{|_,p|p%length}

      steps_left-=1
      pos += 1

      if other_pos.include? (pos%length)
        steps_left -= 1 unless taking_over
        taking_over = true
      else
        taking_over = false
        crt[1] = pos
      end
    end

    if crt[1] >= n*length
      digit_positions.delete(crt)
      result<<n
    end
  }
  result
}

Python 2, 345 байт

Шкода, що він не коротший, ніж @ w0lf, але whatev. (Зверніть увагу, що великі відступи - це вкладки, які перекладаються на 4 пробіли, коли я публікую повідомлення.)

def r(o,l):
 n=len(o);s,t,a,d=dict(zip(o,range(n)[::-1])),-1,{_:0 for _ in o},[]     
 while len(s):
    t+=1;g=o[t%n]
    if g in d:continue
    y,k=s[g],1;i=z=w=0
    for _ in[0]*g:
     i+=1;m=y+i;e,p=m%l,m/l
     if-~a[g]+w>=g<d>m>=l:a[g]+=1;del s[g];d+=[g];break
     if e in s.values()and e!=y:i-=k;k=0
     else:k,s[g],(w,z)=1,e,[(w,z),(z,p)][z<p]
    a[g]+=z
 print d

ось мій магічний прокладений код

C (457 430b)

int v(int*M,int m){
int i,n,c,d,e=32,f=48,u=0,g=10,h,k,r,l=m,j;char a,*b=&a,*B,V[m];
for (i=0;u<m*m*m;i=(++u%m),*B=*b=(u<=l)?*b:e,b=B=&a)
printf("%c%c",0*(V[i]=(u<l?u>=(r=l-sizeof(M)/4)?M[u-r]+f:e:V[i])),((((V[c=(((V[i]=u<l?e:V[i])-f)/10<u/m)?j>=0&h<i|((h=(j=strchr(V+((k=(m+(d=(i-(V[i]-f)%g+1)))%m)),e)-V)<0?(int)(strchr(V,e)-V):(int)j)>=k)*(k>i)?h:m :m])=((V[c]==e)?(*(b=V+i)+(d<0)*g):V[c])))-f)%11==0?(*(B=V+c)-f)%g+f:0);
getch();
}

Примітка . Це потребує вдосконалення ...

EDIT: код скорочений ... - sizeof (int) = 4, функція = v, як і раніше залишається деяка змінна, що замінює.