Celem tego wyzwania jest stworzenie programu, który wypisze n-tą literę swojego kodu źródłowego, gdzie n jest podane jako dane wejściowe do programu. Podobnie jak większość wyzwań quine, nie możesz czytać kodu źródłowego jako pliku ani używać wbudowanych funkcji quine.

Wejście

Liczba całkowita 0 <= n <len (program).

Wynik

N-ty znak (nie bajt) twojego programu.

Zwycięski

Jak większość pytań o codegolf, wygrywasz wyzwanie, używając najmniejszej liczby bajtów do rozwiązania problemu.

Bonusy

-5% Jeśli twój program obsługuje negatywne indeksy, styl pythonowy (np. -1 byłby ostatnim znakiem twojego programu). Jeśli użyjesz z poniższą premią, twoje zakresy muszą obsługiwać ujemne wskaźniki.
-20% Jeśli twój program obsługuje zakresy jako dane wejściowe (dowolny format) oprócz powyższych wymagań.
-25% Jeśli twój program ukończy oba bonusy.

Liderów

Oto fragment kodu, który pozwala wygenerować zarówno zwykłą tabelę wyników, jak i przegląd zwycięzców według języka.

Aby upewnić się, że twoja odpowiedź się pojawi, zacznij od nagłówka, korzystając z następującego szablonu Markdown:

# Language Name, N bytes

gdzie Njest rozmiar twojego zgłoszenia. Jeśli poprawić swój wynik, to może zachować stare porachunki w nagłówku, uderzając je przez. Na przykład:

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

Jeśli chcesz umieścić w nagłówku wiele liczb (np. Ponieważ twój wynik to suma dwóch plików lub chcesz osobno wymienić kary za flagi tłumacza), upewnij się, że rzeczywisty wynik jest ostatnią liczbą w nagłówku:

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

Możesz także ustawić nazwę języka jako link, który pojawi się we fragmencie tabeli wyników:

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

var QUESTION_ID=70727,OVERRIDE_USER=32700;function answersUrl(e){return"https://api.stackexchange.com/2.2/questions/"+QUESTION_ID+"/answers?page="+e+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+ANSWER_FILTER}function commentUrl(e,s){return"https://api.stackexchange.com/2.2/answers/"+s.join(";")+"/comments?page="+e+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+COMMENT_FILTER}function getAnswers(){jQuery.ajax({url:answersUrl(answer_page++),method:"get",dataType:"jsonp",crossDomain:!0,success:function(e){answers.push.apply(answers,e.items),answers_hash=[],answer_ids=[],e.items.forEach(function(e){e.comments=[];var s=+e.share_link.match(/\d+/);answer_ids.push(s),answers_hash[s]=e}),e.has_more||(more_answers=!1),comment_page=1,getComments()}})}function getComments(){jQuery.ajax({url:commentUrl(comment_page++,answer_ids),method:"get",dataType:"jsonp",crossDomain:!0,success:function(e){e.items.forEach(function(e){e.owner.user_id===OVERRIDE_USER&&answers_hash[e.post_id].comments.push(e)}),e.has_more?getComments():more_answers?getAnswers():process()}})}function getAuthorName(e){return e.owner.display_name}function process(){var e=[];answers.forEach(function(s){var r=s.body;s.comments.forEach(function(e){OVERRIDE_REG.test(e.body)&&(r="<h1>"+e.body.replace(OVERRIDE_REG,"")+"</h1>")});var a=r.match(SCORE_REG);a&&e.push({user:getAuthorName(s),size:+a[2],language:a[1],link:s.share_link})}),e.sort(function(e,s){var r=e.size,a=s.size;return r-a});var s={},r=1,a=null,n=1;e.forEach(function(e){e.size!=a&&(n=r),a=e.size,++r;var t=jQuery("#answer-template").html();t=t.replace("{{PLACE}}",n+".").replace("{{NAME}}",e.user).replace("{{LANGUAGE}}",e.language).replace("{{SIZE}}",e.size).replace("{{LINK}}",e.link),t=jQuery(t),jQuery("#answers").append(t);var o=e.language;/<a/.test(o)&&(o=jQuery(o).text()),s[o]=s[o]||{lang:e.language,user:e.user,size:e.size,link:e.link}});var t=[];for(var o in s)s.hasOwnProperty(o)&&t.push(s[o]);t.sort(function(e,s){return e.lang>s.lang?1:e.lang<s.lang?-1:0});for(var c=0;c<t.length;++c){var i=jQuery("#language-template").html(),o=t[c];i=i.replace("{{LANGUAGE}}",o.lang).replace("{{NAME}}",o.user).replace("{{SIZE}}",o.size).replace("{{LINK}}",o.link),i=jQuery(i),jQuery("#languages").append(i)}}var ANSWER_FILTER="!t)IWYnsLAZle2tQ3KqrVveCRJfxcRLe",COMMENT_FILTER="!)Q2B_A2kjfAiU78X(md6BoYk",answers=[],answers_hash,answer_ids,answer_page=1,more_answers=!0,comment_page;getAnswers();var SCORE_REG=/<h\d>\s*([^\n,]*[^\s,]),.*?([\d\.]+)(?=[^\n\d<>]*(?:<(?:s>[^\n<>]*<\/s>|[^\n<>]+>)[^\n\d<>]*)*<\/h\d>)/,OVERRIDE_REG=/^Override\s*header:\s*/i;

body{text-align:left!important}#answer-list,#language-list{padding:10px;width:290px;float:left}table thead{font-weight:700}table td{padding:5px}

<script src="https://ajax.googleapis.com/ajax/libs/jquery/2.1.1/jquery.min.js"></script> <link rel="stylesheet" type="text/css" href="//cdn.sstatic.net/codegolf/all.css?v=83c949450c8b"> <div id="answer-list"> <h2>Leaderboard</h2> <table class="answer-list"> <thead> <tr><td></td><td>Author</td><td>Language</td><td>Size</td></tr></thead> <tbody id="answers"> </tbody> </table> </div><div id="language-list"> <h2>Winners by Language</h2> <table class="language-list"> <thead> <tr><td>Language</td><td>User</td><td>Score</td></tr></thead> <tbody id="languages"> </tbody> </table> </div><table style="display: none"> <tbody id="answer-template"> <tr><td>{{PLACE}}</td><td>{{NAME}}</td><td>{{LANGUAGE}}</td><td>{{SIZE}}</td><td><a href="{{LINK}}">Link</a></td></tr></tbody> </table> <table style="display: none"> <tbody id="language-template"> <tr><td>{{LANGUAGE}}</td><td>{{NAME}}</td><td>{{SIZE}}</td><td><a href="{{LINK}}">Link</a></td></tr></tbody> </table>

Pyth, 0,75

(Zdarza się również, że jest to poliglota CJam i prawdopodobnie wiele innych języków).

0

Oczekuje danych wejściowych STDIN:

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

Oczywiście każda pojedyncza cyfra działa. Niezupełnie najciekawsze wyzwanie w Pyth.

JavaScript ES6, 31 bajtów

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

Wyjaśnienie

Standardowe ramy quine:

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

[prompt()], który jest dodatkiem, pobiera wartość z indeksu wejściowego wynikowego ciągu znaków quine.

𝔼𝕊𝕄𝕚𝕟, 9 znaków / 19 bajtów

⟮ɕṡ+ᶈ0)⎖ï

Try it here (Firefox only).

Tak, 19 bajt!

0 działa również (i jest znacznie lepszy), ale jest to zbyt trywialne dla moich upodobań.

Ponadto ℹ ï,⧺ïdziałałoby również, ale funkcje quine są niedozwolone.

Wyjaśnienie

Standardowe ramy quine to ⟮ɕṡ+ᶈ0.

)⎖ï pobiera wynikowy ciąg znaków quine i pobiera znak z indeksu wejściowego.

Rozwiązanie premiowe, 11,4 znaków / 25,65 bajtów

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

Try it here (Firefox only).

Ten kwalifikuje się do premii 5%, ale nadal nie bije mojego oryginalnego zgłoszenia.

Wyjaśnienie

Ten używa stosu. ᵖ…ɕṡ+ᶈ0;po prostu wypycha poszczególne znaki łańcucha quine na stos i ôᵍïbezpośrednio wyprowadza znak na indeks wejściowy (dodatni lub ujemny) na stosie.

CJam, 12,35 bajtów

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

Program ma 13 bajtów długości i kwalifikuje się do premii × 0,95 . Wypróbuj online!

Jak to działa

{         }      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.

Rubin, 53 * 0,75 = 39,75

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

Generuje łańcuch HEREDOC rozdzielany przez a 2we własnej linii, konkatenuje go ( *2), a następnie dodaje w końcowej postaci 2za pomocą literału znaku. Wycina na niego za pomocą wbudowanego Ruby String#[], który obsługuje dodatnie liczby całkowite, ujemne liczby całkowite i zakresy (dane wejściowe w formularzu m..n). $><<jest wyprowadzany. ( putswymagałoby tutaj dodatkowego miejsca).

Rubinowy, 38,25 bajtów

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

Obsługuje ujemne wskaźniki i zakresy. Rażąco podniosłem oba $><<i evallewę od histokraty, a na początku quine trik był od kogoś innego, więc zrobię to CW.

Python 2, 46,55 bajtów

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

Obsługuje ujemne wskaźniki.

Haskell, 122 bajty

main=getLine>>= \i->putChar$(!!(read i))$p++show p where p="main=getLine>>= \\i->putChar$(!!(read i))$p++show p where p="

Nie golfowany:

main=getLine>>= \i->putChar$(!!(read i))$p++show p
 where p="main=getLine>>= \\i->putChar$(!!(read i))$p++show p\n where p="

Befunge 93, 5 bajtów

Jest dość (bardzo) późno, ale mimo to opublikuję:

&0g,@