색인 가능한 퀴네 당신이 당신의 점수를 향상시킬 경우에,

이 과제의 목표는 소스 코드의 n 번째 문자를 출력하는 프로그램을 만드는 것입니다. 여기서 n은 프로그램에 입력으로 제공됩니다. 대부분의 quine 과제와 마찬가지로 소스 코드를 파일로 읽거나 내장 quine 함수를 사용할 수 없습니다.

입력

정수 0 <= n <len (프로그램).

산출

프로그램의 n 번째 문자 (바이트 아님)

승리

대부분의 codegolf 질문과 마찬가지로 가장 적은 수의 바이트를 사용하여 문제를 해결함으로써 문제를 해결할 수 있습니다.

보너스

-5 % 프로그램이 음의 인덱스 파이썬 스타일을 지원하는 경우 (예 : -1이 프로그램의 마지막 문자 임). 아래 보너스와 함께 사용하는 경우 범위는 음의 지수를 지원해야합니다.
-20 % 프로그램이 위 요구 사항 외에 입력 (모든 형식)으로 범위를 지원하는 경우.
프로그램이 두 보너스를 모두 완료하면 -25 %

리더 보드

다음은 일반 리더 보드와 언어 별 수상자 개요를 생성하는 스택 스 니펫입니다.

답변이 표시되도록하려면 다음 마크 다운 템플릿을 사용하여 헤드 라인으로 답변을 시작하십시오.

# Language Name, N bytes

N제출물의 크기는 어디에 있습니까 ? 당신이 당신의 점수를 향상시킬 경우에, 당신은 할 수 있습니다 를 통해 눈에 띄는에 의해, 헤드 라인에 오래된 점수를 유지한다. 예를 들어 :

# Ruby, <s>104</s> <s>101</s> 96 bytes

헤더에 여러 개의 숫자를 포함 시키려면 (예 : 점수가 두 파일의 합계이거나 인터프리터 플래그 페널티를 별도로 나열하려는 경우) 실제 점수가 헤더 의 마지막 숫자 인지 확인하십시오 .

# Perl, 43 + 2 (-p flag) = 45 bytes

언어 이름을 링크로 만들어 리더 보드 스 니펫에 표시 될 수도 있습니다.

# [><>](http://esolangs.org/wiki/Fish), 121 bytes

코드 스 니펫 표시

답변

피 이스, 0.75

(CJam 폴리 글롯이자 많은 다른 언어 일 수도 있습니다.)

0

STDIN에 대한 입력이 예상됩니다.

llama@llama:~$ echo 0..0 | pyth -c '0'
0

물론 모든 한 자리 숫자가 작동합니다. Pyth에서 가장 흥미로운 도전은 아닙니다.

답변

자바 스크립트 ES6, 31 바이트

$=_=>`$=${$};$()`[prompt()];$()

설명

표준 퀴네 프레임 워크 :

$=_=>`$=${$};$()`;$()

[prompt()]애드온 인은 결과 퀴네 문자열의 입력 인덱스에서 값을 가져옵니다.

답변

?????, 9 문자 / 19 바이트

⟮ɕṡ+ᶈ0)⎖ï

Try it here (Firefox only).

Ay, 19 번째 바이트!

0 작동하지만 훨씬 좋습니다.하지만 좋아하는 것은 너무 사소합니다.

또한, ℹ ï,⧺ï도 작동하지만 quine 기능은 허용되지 않습니다 것입니다.

설명

표준 quine 프레임 워크는 ⟮ɕṡ+ᶈ0입니다.

)⎖ï 결과 quine 문자열을 가져 와서 입력 색인에서 문자를 가져옵니다.

보너스 솔루션, 11.4 자 / 25.65 바이트

⟮ᵖ…ɕṡ+ᶈ0;ôᵍï

Try it here (Firefox only).

이것은 5 % 보너스를받을 자격이 있지만 원래 제출물을 초과하지는 않습니다.

설명

이것은 스택을 사용합니다. ᵖ…ɕṡ+ᶈ0;quine 문자열의 개별 문자를 스택으로 푸시하고 스택 ôᵍï의 입력 색인 (양수 또는 음수)에서 문자를 직접 출력합니다.

답변

CJam, 12.35 바이트

{s"_~"+ri=}_~

프로그램의 길이 는 13 바이트 이며 × 0.95 보너스를받을 수 있습니다.온라인으로 사용해보십시오!

작동 원리

{         }      Define a code block.
           _~    Push a copy and execute the copy.
 s               Cast the original code block to string.
  "_~"+          Append "_~".
       ri        Read an integer from STDIN.
         =       Retrieve the character at that index.

답변

루비, 53 * 0.75 = 39.75

$><<(<<2*2+?2)[eval gets]
$><<(<<2*2+?2)[eval gets]
2

2자체 행에서 HEREDOC 문자열을 구분하여 생성하고이를 연결 ( *2) 한 다음 2문자 리터럴을 통해 마지막에 추가합니다 . String#[]양의 정수, 음의 정수 및 범위 (형식으로 입력)를 지원 하는 Ruby의 내장을 사용하여 슬라이스 합니다 m..n. $><<출력됩니다. ( puts여기에는 추가 공간이 필요합니다).

답변

루비, 38.25 바이트

a="a=%p;$><<(a%%a)[eval gets]";$><<(a%a)[eval gets]

음수 인덱스 및 범위를 지원합니다. 나는 노골적으로 집어 모두 $><<와 evalhistocrat에서 트릭, 그리고이 CW를 만들거야 그래서 quine 트릭로 시작하는 다른 사람이었다.

답변

파이썬 2, 46.55 바이트

a="a=%r;print(a%%a)[input()]";print(a%a)[input()]

음수 지수를 지원합니다.