Rozważ następującą listę:

expected = [
'A',
'B',
'AB',
'C',
'D',
'CD',
'ABCD',
'E',
'F',
'EF',
'G',
'H',
'GH',
'EFGH',
'ABCDEFGH',
'I',
'J',
'IJ',
'K',
'L',
'KL',
'IJKL',
'M',
'N',
'MN',
'O',
'P',
'OP',
'MNOP',
'IJKLMNOP',
'ABCDEFGHIJKLMNOP',
...
]

Oto jeden ze sposobów, aby na to spojrzeć - uczysz się pisać chińskie znaki i chcesz nauczyć się coraz większych ich fragmentów, ćwicząc je podczas podróży. Zaczynasz od A, potem B, a potem jest już sekwencja złożona z dwóch, więc ją połączysz. Następnie idź z C i D, stwórz kolejną parę, ćwicz ją. Następnie ćwiczysz: ABCD. To samo dotyczy E do H, a następnie ćwiczyć: ABCDEFGH. Lista jest nieskończona.

Celem jest wygenerowanie i wydrukowanie n-tego elementu tej listy, indeksów rosnących od zera. Załóżmy, że po „Z” znów dostajesz „A”.

Kryterium wygranej to długość kodu źródłowego.

Python 2, 53 bajty

x,y=0,1
exec"x^=y-x;y+=x/y;"*input()
print range(x,y)

Wypróbuj online!

Podobnie do tej konstrukcji z transformacją x = u-v,y = u

JavaScript (ES6), 59 bajtów

Możemy zaoszczędzić 2 bajty, tworząc sekwencję 1 indeksowaną i stosując uproszczenie podobne do tego używanego przez KSab :

n=>(x=g=y=>n?g(y+=y==(x^=y-x),n--):x<y?[x++,...g(y)]:[])(1)

Wypróbuj online!

JavaScript (ES6), 61 bajtów

Zwraca listę nie zawijających liczb całkowitych.

n=>(g=v=>n?g(u&-u^v?v*2:!!u++,n--):v?[u-v,...g(v-1)]:[])(u=1)

Wypróbuj online!

Na podstawie konstrukcji Donalda Knutha. Powiązany wpis OEIS: A182105 .

W jaki sposób?

Jest to dwustopniowa funkcja rekurencyjna.

$(u_n,v_n)$$(u_1,v_1)=(1,1)$

$[u_n-v_n,u_n-v_n+1,\dots,u_n]$

JavaScript (ES6), 97 bajtów

Zwraca zawijanie wielkich liter.

n=>(s=i='',g=v=>(s+=String.fromCharCode(65+i++%26),n--)?g(u&-u^v?v*2:!!u++):s.substr(u-v,v))(u=1)

Wypróbuj online!

Lub 91 bajtów małymi literami.

Python 2 , 60 bajtów

u=v=1
exec"v=u/v%2or 2*v;u+=1/v;"*input()
print range(u-v,u)

Wypróbuj online!

Na podstawie wykorzystania konstrukcji Knutha przez Arnaulda . Warunek u&-u==vmożna zastąpić prostszym warunkiem u/v%2>0lub alternatywnie u&v>0, ponieważ vzawsze jest to potęga 2, którą umożna podzielić.

Wolfram Language (Mathematica) , 80 71 bajtów

Range@#2+#-#2&@@Nest[If[#~BitAnd~-#==#2,{#+1,1},{#,2#2}]&@@#&,{1,1},#]&

Wypróbuj online!

Zwraca listę liczb całkowitych zamiast zawijanego ciągu alfabetu. 0-indeksowane.

Wykorzystuje OEIS A182105 , dzięki @Arnauld.

Drukowanie listy w nieskończoność, 54 bajty

Do[j=Range@i;#∣i&&Print@j[[-#;;]]&/@(2^j/2),{i,∞}]

Wypróbuj online!

1-indeksowany. Wersja TIO ma limzamiast ∞zapobiegać awariom.

Python 2 , 93 89 82 bajtów

def f(n):r=[];C=1;exec"p=C%2or 2*p;r+=[p];C=r.count(p);"*n;return range(C*p-p,C*p)

Wypróbuj online!

Zwraca listę liczb całkowitych. Podobne do podejścia Javascript w Arnauld's .

Galaretka , 16 bajtów

1;ẎṀ+ƊẎQṭƊƊ¡ị@‘Ṿ

$13$

Pełny program Wyświetla ,oddzielną listę liczb całkowitych.

Węgiel drzewny , 45 42 35 bajtów

ＦＮ⊞υ⎇∧›Ｌυ¹⁼Ｌ§υ±¹Ｌ§υ±²⁺⊟υ⊟υ§αＬ⭆υκ⮌⊟υ

Wypróbuj online! Link jest do pełnej wersji kodu. 1-indeksowany. Nie mogłem znaleźć prostej formuły do ​​wygenerowania wyniku, więc po prostu zastosowałem się do procedury podanej w pytaniu. Wyjaśnienie:

ＦＮ

Powtórz podaną liczbę nrazy.

⊞υ

Wciśnij następny element do predefiniowanej pustej tablicy u, obliczonej jako ...

⎇∧›Ｌυ¹⁼Ｌ§υ±¹Ｌ§υ±²

... jeśli jest więcej niż jeden element, ua ostatnie dwa elementy mają tę samą długość ...

⁺⊟υ⊟υ

... następnie dodaj przedostatni element do ostatniego elementu (który tworzy wynik w odwrotnej kolejności) ...

§αＬ⭆υκ

... w przeciwnym razie można znaleźć następną literę, licząc, ile liter dodaliśmy do tej pory i cyklicznie indeksując do predefiniowanego dużego alfabetu. (Przyjmowanie sumy długości lub długości sumy kończy się niepowodzeniem, gdy lista jest pusta, a mapowanie listy na ciąg oszczędza dwa bajty na specjalnym umieszczeniu pustej listy.)

⮌⊟υ

Weź ostatni element u, który jest odwrócony nth żądanej listy, i niejawnie wydrukuj odwrotną stronę.