양의 정수 중첩 수준을 감안할 때 n문자열 s인쇄 가능한 ASCII 문자 (의 에 ~같은 언어로 실행하면, 프로그램을 출력하는 프로그램을 출력하고, 출력하는 프로그램... 문자열을 출력합니다 s.

총 n프로그램이 생성되어야하며, 모든 프로그램은 답변과 동일한 언어로 실행되어야합니다.

참고 : 기본적으로 제출로 허용되는 모든 프로그램 또는 기능을 출력 할 수 있습니다.

s이스케이프 문자로 입력 할 수 있으며 , 언어로 된 프로그램이나 함수가 일반적으로 문자열을 입력하는 방식입니다.

예

예를 들어, 주어진 n=1and s="recursion", Python 2 프로그램은 다음을 출력 할 수 있습니다.

print "recursion"

이것을 실행하면 다음과 같이 출력됩니다.

recursion

주어 n=2와의 = "PPCG", 파이썬이 프로그램의 힘 출력 :

print "print \"PPCG\" "

이 출력을 실행하면

print "PPCG"

이 출력을 실행하면

PPCG

관련 (+ 제목 영감) : 하나 더 LUL 그리고 나

또한 관련 (샌드 박스에서-이제 삭제되었지만 여전히 평판이 좋은 것으로 볼 수 있음) : 소스 코드 재귀

테스트 사례

코드가 다음 테스트 사례 (한 줄에 하나씩)에서 작동하는지 확인하십시오.

n s
2 PPCG
4 Robert'); DROP TABLE Students;--
17 Deep
2 Spaces In Here
3 "Don't forget quotes!"
5 'Backt`cks might be a h`tch'
6 5%s
8 [Brackets]<Are>(Great){Usually}
3 !"#$%&'()*+,-./ 0123456789:;<=>?@ABCDEFGHIJKLMN
6 OPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~
7 THE QUICK BROWN FOX JUMPS OVER THE LAZY DOG
3 the quick brown fox jumps over the lazy dog

젤리 , 2 바이트

Ṿ¡

온라인으로 사용해보십시오!

Ṿ¡  Main link; left argument (text) is x, right argument (repetitions) is y
 ¡  Repeat y times:
Ṿ   Uneval x; produce code that outputs x

hehe 내장

자바 스크립트 (ES6), 47 44 바이트

@HermanLauenstein 덕분에 3 바이트 절약

카레 구문으로 입력을 (n)(s)받습니다.

n=>g=s=>`alert(atob("${btoa(--n?g(s):s)}"))`

예

f(2)('PPCG')

출력합니다 :

'alert(atob("YWxlcnQoYXRvYigiVUZCRFJ3PT0iKSk="))'

다음과 같이 인쇄됩니다.

'alert(atob("UFBDRw=="))'

다음과 같이 인쇄됩니다.

'PPCG'

데모

alert()중간 결과가 콘솔에 인쇄되고 자동으로 실행되도록 재정 의 된보다 복잡한 예 입니다.

let f =

n=>g=s=>`alert(atob("${btoa(--n?g(s):s)}"))`

alert = s => { console.log(s); try { eval(s); } catch(e) {} }

alert(f(5)("'Backt`cks might be a h`tch'"));

대체 버전, 40 바이트

@Shaggy의 추천

이것은 전체 프로그램 대신 익명 함수를 반환합니다.

n=>g=s=>`_=>atob("${btoa(--n?g(s):s)}")`

sh + coreutils, 31 바이트

yes exec sed 1d \$0|sed $1q;cat

소요 n명령 줄 매개 변수로와 sSTDIN에.

파이썬 2 , 40 바이트

f=lambda r,t:r and"print%r"%f(r-1,t)or t

온라인으로 사용해보십시오!

xnor 덕분에 -4 바이트

하스켈, 17 바이트

내가 글을 쓸 때, 이것은 골프 이외의 언어에 대한 가장 짧은 대답입니다 .

이 얻어 함수 s와 n그 순서 및 결과 나 검사시 다음의 소스 코드를 반환하는 식의 소스 코드를 반환한다.

(!!).iterate show

이것이 중요한 이유에 대한 논쟁 :

1. 솔루션은 기능 할 수 있습니다.
2. 그들의 출력은 기능이 될 수 있습니다.
3. 이러한 기능에는 매개 변수가 없습니다.
4. Haskell에서는 게으르고 모든 것이 커지기 때문에 실제 프로그래밍 목적으로 가장 자연스러운 0 매개 변수 함수의 정의는 결과와 동일합니다. 가장 가까운 대안, 매개 변수를 무시하는 1 매개 변수 함수는 바보입니다.

경우 f부여 PPCG하고 2그 파라미터로서, 결과는 텍스트이다 "\"PPCG\""(제 1 생성 기능)을 평가하는 경우에 반환 텍스트 "PPCG"(초 연료 소모량 생성), 그 평가 될 때 반환 PPCG.

단축을 제안 해준 nimi 에게 감사합니다 .

APL (Dyalog) , 24 23 바이트

ngn 덕분에 -1입니다.

이 프로그램은 프롬프트를 표시 s한 다음 nSTDOUT을 인쇄하고 인쇄 하는 전체 프로그램입니다 .

''''{⍺,⍨⍺,⍵/⍨1+⍵=⍺}⍣⎕⊢⍞

온라인으로 사용해보십시오! (17 깊은 경우는 TIO의 출력 제한을 초과하므로 생략됩니다-오프라인으로 작동)

⍞ 묻다 s

⊢ 그 수율 (분리하도록 ⎕하고 ⍞)

''''{… 이 람다를 여러 번 왼쪽 인수로 작은 따옴표로 }⍣⎕ 프롬프트 n하고 적용하십시오. ⍺왼쪽 인수 (따옴표) ⍵를 나타내고 오른쪽 인수 (입력 텍스트)를 나타냅니다.

 ⍵=⍺ 텍스트가 따옴표와 같은 부울

 1+ 하나 추가

 ⍵/⍨ 인수의 각 문자를 해당 횟수만큼 복제

 ⍺, 따옴표를 붙이다

 ⍺,⍨ 견적을 추가하다

이것은 APL의 문자열이 '구분되고 문자열의 작은 따옴표가 두 배가되는 반면 다른 문자는 이스케이프 처리 할 필요 가 없기 때문에 작동합니다 .

Dyalog APL에는 또한 유틸리티 ( ⎕SE.Dyalog.Utils.repObj)가 포함되어 있으며 ( Jelly 's ununeval 과 유사한) 인수로 평가되는 APL 표현식을 생성합니다 . 따라서 다음 프로그램은 위와 동일하지만 모든 배열에서 작동 합니다.

⎕SE.Dyalog.Utils.repObj⍣⎕⊢⎕

온라인으로 사용해보십시오!

Firefox JavaScript, 41 35 바이트

f=(s,n)=>"_=>"+uneval(--n?f(s,n):s)

Firefox에는 nice uneval가 있는데, 이는 주어진 객체 (이 경우 문자열)와 같은 소리를냅니다.

자바 8, 95 93 바이트

String c(String s,int n){return"v->\""+(n-->1?c(s,n).replaceAll("[\\\\\"]","\\\\$0"):s)+'"';}

@Lynn 덕분에 -2 바이트 .

특수 문자를 이스케이프 처리하는 것은 Java에서 매우 성가시다 ..

여기 에서 시도하고 결과 방법을 시도하십시오 .

설명:

String c(String s,int n){  // Method with String and int parameters and String return-type
  return"v->\""+           //  Return literal "v->" + a leading double-quote +
   (n-->1?                 //   If `n` is larger than 1:
     c(s,n)                //    Recursive-call,
      .replaceAll("[\\\\\"]","\\\\$0")
                           //    with all double-quotes ('"') and slashes ('\') escaped
    :                      //   Else:
     s)                    //    The input String
   +'"';                   //   + a trailing double quote
}                          // End of method 

정규식 교체에 대한 추가 설명 :

.replaceAll("[\\\\\"]","\\\\$0")
.replaceAll("        ","      ")  // Replace the match of the 1st String, with the 2nd
             [      ]             //  One of these inner characters:
              \\\\                //   Escaped slash ('\')
                  \"              //   Escaped double-quote ('"')
                                  //  And replace them with:
                        \\\\      //   Escaped slash ('\'),
                            $0    //   plus found match

왜이 모든 슬래시?

\   →  \\       // Escapes a single slash for the regex
\\  →  \\\\     // Escapes both regex-escaped slashes for the String
"   →  \"       // Escapes a double-quote for the String

언더로드 , 11 바이트

(a(S)*)~^^S

온라인으로 사용해보십시오!

입력은 스택에서 시작해야하며 숫자는 맨 위에 숫자로 표시 됩니다. 이것이 유효한 입력 방법인지는 모르지만 사양에 입력이 없으며 스택 맨 위에 입력을 배치하는 것은 그러한 언어에서 사용되는 좌초 된 방법처럼 보입니다.

GolfScript , 5 바이트

~{`}*

온라인으로 사용해보십시오!

QuadR , 8 바이트

ngn 's answer의 간단한 번역 .

소요 n인수로하고 s입력한다.

^|'|$
'&

온라인으로 사용해보십시오!

PCRE R은 모든 인스턴스를 eplace

^|'|$ 줄의 시작 또는 견적 또는 줄의 끝

'& 견적과 전체 일치

인수는 변환을 반복 할 횟수를 지정합니다.

R , 62 바이트

f=function(n,s){"if"(n,{formals(f)$n=n-1;formals(f)$s=s;f},s)}

온라인으로 사용해보십시오!

그래서처럼 전화 : f(n,s)다음 n의 사본()

명명 된 함수 익명 함수를 반환합니다. 그 결과 는 formalsof 의 기본값을 수정하여 f결과 함수를 호출 할 수 있습니다 (그런 다음 호출 된 결과, n시간). 에 n도달하면를 0반환합니다 s.

R은 실제로 탈출하는 데 너무 나쁘지 않습니다! 그것은 당신이 그냥 입력을 교체해야하므로, 탈출 C-스타일을 사용 "하여 \"와 \함께 \\, 다음에 전체를 감싸 " ".

Pyth, 21 바이트

L++NsXbJ,N\\+L\\JNyFz

여기에서 시도하십시오.

불행히도 재귀 함수 (위와 같이 전체 프로그램이 아님)는 더 길다 (24 바이트).

M?GgtG++NsXHJ,N\\+L\\JNH

APL (Dyalog Classic) , 19 바이트

'^|''|$'⎕r'''&'⍣⎕⊢⍞

온라인으로 사용해보십시오!

루비 , 34 바이트

%p파이썬에서 inspect와 비슷한 인자 값 을 얻는 루비 특정 printf 플래그입니다 %r. $><<인쇄를 의미합니다.

f=->n,s{"$><<%p"%(n>1?f[n-1,s]:s)}

온라인으로 사용해보십시오!

Excel VBA (32 비트), 67 바이트

2^i64 비트 VBA가 아닌 32 비트 VBA에서는 오류없이 평가 되므로 32 비트 Excel VBA로 버전이 제한됨

익명 VBE 즉시 창 함수는 입력 n및 s범위에서 가져 [A1]오고 [B1]터미널로만 평가 될 때 ( n반복 후 ) s해당 터미널 로만 출력되는 익명 함수를 출력합니다.

For i=0To[A1-1]:q=q+"?"+String(2^i,34):Next:?q[B1]Replace(q,"?","")

샘플 입력 / 출력

[A1:B1]=Array(7, "PPCG")
For i=0To[A1-1]:q=q+"?"+String(2^i,34):Next:?q[B1]Replace(q,"?","")
?"?""?""""?""""""""?""""""""""""""""?""""""""""""""""""""""""""""""""?""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""PPCG"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""
?"?""?""""?""""""""?""""""""""""""""?""""""""""""""""""""""""""""""""PPCG"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""
?"?""?""""?""""""""?""""""""""""""""PPCG"""""""""""""""""""""""""""""""
?"?""?""""?""""""""PPCG"""""""""""""""
?"?""?""""PPCG"""""""
?"?""PPCG"""
?"PPCG"
PPCG