Hãy xem xét danh sách sau đây:

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',
...
]

Đây là một cách để xem xét nó - bạn đang học cách viết các ký tự Trung Quốc và muốn học các khối ngày càng lớn của chúng, luyện tập chúng khi bạn đi. Bạn bắt đầu với A, sau đó đi với B, sau đó đã có một chuỗi là một cặp hai để bạn kết hợp nó. Sau đó, bạn đi với C và D, tạo một cặp khác, thực hành nó. Sau đó bạn tập lại: ABCD. Sau đó, tương tự với E lên đến H, sau đó diễn tập: ABCDEFGH. Danh sách là vô hạn.

Mục tiêu là tạo và in ra một phần tử thứ n của danh sách này, các chỉ mục tăng từ 0. Giả sử rằng sau 'Z', bạn lại nhận được 'A'.

Các tiêu chí chiến thắng là chiều dài mã nguồn.

Python 2, 53 byte

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

Hãy thử trực tuyến!

Tương tự như việc xây dựng này với sự chuyển đổi x = u-v,y = u

JavaScript (ES6), 59 byte

Chúng ta có thể lưu 2 byte bằng cách tạo chuỗi 1 được lập chỉ mục và sử dụng đơn giản hóa tương tự như chuỗi được sử dụng bởi KSab :

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

Hãy thử trực tuyến!

JavaScript (ES6), 61 byte

Trả về một danh sách các số nguyên không gói.

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

Hãy thử trực tuyến!

Dựa trên một công trình của Donald Knuth. Mục OEIS liên quan: A182105 .

Làm sao?

Đây là một chức năng đệ quy hai giai đoạn.

$(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 byte

Trả về gói chữ hoa.

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)

Hãy thử trực tuyến!

Hoặc 91 byte bằng chữ thường.

Python 2 , 60 byte

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

Hãy thử trực tuyến!

Dựa trên việc Arnauld sử dụng công trình của Knuth . Điều kiện u&-u==vcó thể được thay thế bằng một điều kiện đơn giản hơn u/v%2>0, hoặc thay vào đó u&v>0, vì vluôn luôn có lũy thừa bằng 2 uchia hết cho.

Ngôn ngữ Wolfram (Mathicala) , 80 71 byte

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

Hãy thử trực tuyến!

Trả về một danh sách các số nguyên thay vì một chuỗi các bảng chữ cái. Chỉ số 0.

Sử dụng OEIS A182105 , nhờ @Arnauld.

In danh sách vô thời hạn, 54 byte

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

Hãy thử trực tuyến!

1 chỉ mục. Phiên bản TIO limthay vì ∞để tránh sự cố.

Python 2 , 93 89 82 byte

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)

Hãy thử trực tuyến!

Trả về một danh sách các số nguyên. Tương tự như cách tiếp cận Javascript của Arnauld .

Thạch , 16 byte

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

$13$

Chương trình đầy đủ. In ,danh sách các số nguyên khác nhau.

Than , 45 42 35 byte

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

Hãy thử trực tuyến! Liên kết là phiên bản dài dòng của mã. 1 chỉ mục. Tôi không thể tìm thấy một công thức đơn giản để tạo ra kết quả vì vậy tôi chỉ cần làm theo quy trình được đưa ra trong câu hỏi. Giải trình:

ＦＮ

Lặp lại số nlần đã cho.

⊞υ

Đẩy phần tử tiếp theo vào mảng trống được xác định trước u, được tính là ...

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

... nếu có nhiều hơn một phần tử trong uvà hai phần tử cuối cùng có cùng độ dài ...

⁺⊟υ⊟υ

... sau đó nối phần tử áp chót vào phần tử cuối cùng (tạo kết quả theo thứ tự ngược lại) ...

§αＬ⭆υκ

... nếu không thì có thể tìm thấy chữ cái tiếp theo bằng cách đếm xem có bao nhiêu chữ cái chúng ta đã thêm cho đến nay và lập chỉ mục theo chu kỳ vào bảng chữ cái viết hoa được xác định trước. (Lấy tổng chiều dài hoặc độ dài của tổng không thành công khi danh sách trống và ánh xạ danh sách vào chuỗi sẽ lưu hai byte qua danh sách đặc biệt trong danh sách trống.)

⮌⊟υ

Lấy phần tử cuối cùng của u, đó là nphần tử thứ ngược của danh sách mong muốn và ngầm in ngược lại.