Viết chương trình lấy đầu vào là chuỗi và số nguyên nvà đầu ra:

1. Chuỗi đã được truyền cho chương trình nlần trước;
2. Một chương trình mới sẽ được sử dụng cho lần gọi tiếp theo.

Bạn không thể lưu trữ bất kỳ dữ liệu nào bên ngoài chương trình và chương trình của bạn không thể gọi các chương trình trước đó trong chuỗi. Nếu chuỗi không tồn tại, hãy xuất một chuỗi trống (nhưng vẫn xuất chương trình tiếp theo).

Chạy ví dụ, trong đó tôi sử dụng ký hiệu program_ncho từng chương trình liên tiếp (Tất nhiên, [This text is the nth program]sẽ được thay thế bằng mã thực tế.)

$ program_1 "One" 1
[This text is the second program]
$ program_2 "Two" 1
One
[This text is the third program]
$ program_3 "Three" 2
One
[This text is the fourth program]
$ program_4 "Four" 2
Two
[This text is the fifth program]
$ program_5 "Five" 1
Four
[This text is the sixth program]

CJam, 25

L{\_l~(>1<lN+a@+`@"_~"}_~

Dùng thử trực tuyến

Giải trình:

L      push an empty array (this is the array of previous strings)
{…}    push this block
_      duplicate the block
~      execute the 2nd copy (the stack contains the array and the block)

Khối:

\      swap the array with the block
_      duplicate the array
l      read a line from the input (containing the integer n)
~(     evaluate n and decrement it
>      slice the array starting at that position
1<     slice the resulting array to keep only the first string (if any)
l      read the 2nd line from the input (containing the string)
N+     append a newline
a      wrap in an array
@      bring the previous array to the top
+      concatenate the arrays, thus prepending the new string
`      convert the array to its string representation
@      bring the block to the top
"_~"   push this string

Cuối cùng, chuỗi được yêu cầu (nếu có), biểu diễn của mảng, khối và chuỗi "_ ~" được in tự động.

Python, 221 byte

import sys
o,p=[''],r'import sys;a,o,p=int(sys.argv[2]),[{2},{0}],{1};print o[a] if len(o)>a else "","\n",p.format(`sys.argv[1]`,`p`,",".join(`s`for s in o))'
print '\n',p.format(`sys.argv[1]`,`p`,','.join(`s`for s in o))

Để kiểm tra điều này một cách dễ dàng, hãy sử dụng ./thisgolf.py "yourfirststring" | python -c "import sys;exec(sys.stdin.read().split('\n')[1])" "your second string" <N>, lặp lại bit cuối cùng bao nhiêu lần tùy thích.

Python 2, 207 byte

def r(O,R):import sys,marshal as m;a=sys.argv;b=int(a[2]);O.extend(["",""]*b);O[b]=a[1];print"%s\nfrom marshal import*;c=%r;i=lambda:0;i.__code__=loads(c);i(%r,i)"%(O[0],m.dumps(R.__code__),O[1:])
r([""],r)

Được xây dựng trên chương trình khác nhưng thay đổi chương trình , nhiệm vụ này đơn giản hơn nên tôi có thể chơi gôn này hơn nữa. Nếu tôi có thể lấy đầu vào cho stdin, thì nó sẽ ngắn hơn nhiều.

Javascript ES6, 130 128 121 120 113 byte

a=[];b=_=>{a.push(prompt());console.log((a[a.length-prompt()-1]||"")+`
a=`+JSON.stringify(a)+";b="+b+";b()")};b()