자체 소스 코드를 거꾸로 출력하는 프로그램, 즉 eniuq을 작성하십시오 .

채점 :

• 인터넷에서 풀 데이터를 사용하는 경우 +50
• 자신의 소스 코드를 읽는 경우 +25
• 문자 당 +1 점
• 최저 점수가 이깁니다.

규칙 :

• 없음 사용하여 다른 파일이 없습니다 (예를 들어 reverse.txt)
• 최소 코드 길이는 2 자입니다.
• 프로그램은 회문이 될 수 없습니다.

GolfScript-2

1

(즉 , 개행 문자는 \n1어디에 있습니까 \n)

산출:

1

(즉 1\n)

Ilmari 를 인용하려면 :

GolfScript는 자동으로 줄 바꿈을 출력 끝에 추가합니다

따라서 줄 바꿈 뒤에 숫자가 오면 숫자 뒤에 줄 바꿈이 인쇄됩니다.

응? , 5 자

!hcuO

나는 실제로 어떻게 작동하는지 모르겠지만, 당신이 통역을 다운로드하는 경우, 당신이 작성하는 경우 !hcuO, 당신은 얻을Ouch!

이를 실행하려면 다음과 같이 프로그램을 실행해야합니다.

huh.exe !hcuO

실제로라는 파일을 !hcuO찾지 만 존재하지 않으므로 출력합니다.Ouch!

Mathematica, 3 자

a 2

a 2a시간은 2를 의미합니다 . 따라서 대답은 2 a입니다.

H9 + , 13 자

!dlrow ,olleH

웹 페이지가 말했듯이 H, 9또는 문자가 아닌 모든 문자는 +프로그램이 인쇄Hello, world!

자바 스크립트 : 34 자

reifitnedi detcepxenU :rorrExatnyS

SyntaxError: Unexpected identifier적어도 Chrome 콘솔에서 출력

파이썬, 43 41

_=']0~::[_%%_ tnirp;%r=_';print _%_[::~0]

수학, 2 바이트

1#

출력 :

#1

TI-BASIC, 2

i2

i허수는 어디에 있습니까 ?

출력 2i

기본, 22 12 7 문자

:-)

1 enil ni rorre xatnyS

편집 : 즉시 모드로 프로그램을 입력 할 수 있으면이 rorre xatnyS(12 자) 로 줄어들 수 있습니다 .

BBC BASIC에서는 7 자만 필요합니다.

ekatsiM

C ++ 472 자

많은 문자가 있지만 c 기반 언어에서 더 간단한 방법을 생각할 수 없습니다.

#include<iostream>
#include<string.h>
#define p(t) std::cout<<'}'<<';'<<')'<<strrev(&std::string(#t)[0])<<t;
char* strrev(char*p){char*t=p;char*q=p;while(q&&*q)++q;for(--q;p<q;++p,--q)*p=*p^*q,*q=*p^*q,*p=*p^*q;return t;}
int main(){p("(p{)(niam tni};t nruter;q*^p*=p*,q*^p*=q*,q*^p*=p*)q--,p++;q<p;q--(rof;q++)q*&&q(elihw;p=q*rahc;p=t*rahc{)p*rahc(verrts *rahc;t<<)]0[)t#(gnirts::dts&(verrts<<')'<<';'<<'}'<<tuoc::dts )t(p enifed#>h.gnirts<edulcni#>maertsoi<edulcni#");}

세게 때리다

$ dnuof ton dnammoc :found :hsab-
-bash: dnuof: command not found

길이 : 31 자

쉬

$ dnuof ton dnammoc :found :hs-
sh: dnuof: command not found

길이 : 29 자

이것은 일부 Linux 배포판에서는 작동하지 않지만 OSX에서는 작동합니다.

tcsh

$ .dnuof ton dnammoC :found.
.dnuof: Command not found.

길이 : 26 자

csh

% .dnuof ton dnammoC :found.
.dnuof: Command not found.

길이 : 26 자

우승자는 :

ksh

$ dnuof ton :found :hsk
ksh: dnuof: not found

길이 : 21 자

위의 모든 * unix 기반 OS에서 작동합니다.

GolfScript, 12 자

"-1%.`"-1%.`

이 코드는 이중 인용 문자열을 사용 "-1%.`", (그것을 반대로 -1%그것을 (복제) .) 및 해제 evals ( `주위에 따옴표를 복원) 두 번째 사본을.

이전 항목 (13 자) :

{`'.~'+-1%}.~

이 답변{'.~'}.~ 에서 8 문자 quine 을 기반으로합니다 . 출력을 문자열 화하고 역전시키기 위해서는 여분의 5 개의 문자가 필요합니다.

추신. GolfScript는 자동으로 줄 바꿈을 출력 끝에 추가합니다. 이것이 출력의 일부로 계산되면 출력에 영향을 미치지 않고 해당 문자를 한 줄의 추가 문자 비용으로 추가 할 수 있습니다.

Befunge 98-10 자

"8k,'!1+,@

"여분의 공간을 추가 한 후 인터프리터가 줄 바꿈을 해석하지 않으면 작동합니다 . 인터프리터가 줄 바꿈을 그렇게 해석하면이 11 문자 솔루션이 작동합니다 ( 문자열 리터럴의 중복 공백은 하나로 해석되기 때문에 ).

"9k,'!1+,@ 

g페널티없이 사용할 수 있다면 이것들도 작동합니다 (각각 7 자와 8 자).

"5k,g,@

과

"6k,g,@ 

루비, 60

puts(2,s=<<2.chop.reverse,s)
puts(2,s=<<2.chop.reverse,s)
2

고전적인 루비 퀴네를 기반으로합니다.

펄, 41

$_=q{print~~reverse"\$_=q{$_};eval"};eval

오래된 52 자 답변 (27 + 25 페널티)

open+0;print ~~ reverse <0>

자체 소스를 읽고 스칼라에 반전을 저장 한 후 인쇄합니다.

핵분열 , 6 바이트

같은 길이 인 일반화 quine 하였기에 정상 quine :

"LO+!'

아이디어는 일반 퀴니와 동일하지만 L인쇄 모드가 반대 순서로 코드를 통과하도록 왼쪽 원자 (으로 시작 )를 사용하고 있습니다.

J : 26

표준 Quining (26 문자) : 함수를 정의하고 자체 정의를 따옴표로 전달하여 :

|.(,],2#{:)'|.(,],2#{:)'''

아마 더 짧아 질 수 있습니다.

J-specific (33 chars) : 변수를 정의하고 변수가 정의 된 파일, 즉이 파일을 요청한 다음 해당 파일의 내용을 인쇄합니다.

1!:2&2|.1!:1(4!:4 a=:<'a'){4!:3''

스크립트에서 저장 및 실행해야합니다 (예 : REPL이 아님). 질문에 대한 대답은 "인수가 인수가 파일에 정의되지 않았으므로 읽을 파일이 없기 때문"입니다.

> <> , 25 바이트

나는 이것이 아직 끝나지 않았다는 사실에 놀랐다. :)

...yhsif sllems gnihtemoS

여기에 코드를 붙여서 실행하십시오.

.터지는 점프 명령입니다 x및 y스택에서, 그리고에 IP를 이동 (x, y)코드 상자에. 이 경우 스택이 비어 있으므로 언어의 유일한 오류 메시지가 인쇄됩니다.

Something smells fishy...

마이크로 스크립트 , 11 바이트

나는 이것을해야했다.

0"Caxq"Caxq

놀랍게도이 언어는 실제로 가장 짧은 알려진 실제 퀴네보다 짧습니다. 래핑 따옴표를 추가 하지만 그렇지 않은 경우를 제외 q하고 a는 그렇지 않습니다.qa

자바 스크립트 jQuery 119 92 74 70 자

alert($("#answer-16051 pre code").text().split("").reverse().join(""))

이제 minitech이 의견에서 제안한 것처럼 jQuery를 사용하고 수동으로 래핑 하여이 게시물 간섭의 다른 코드 블록에 대한 두려움없이 <pre><code>사용할 수 있습니다 text(). 수동으로 줄 바꿈 <h4>은 테스트 할 때 크롬 과 호환되지 않으므로 이제는 대부분의 브라우저에서 작동합니다.

이 프로그램은이 페이지에서 실행되면 바로 위의 코드 블록을 찾아 내용을 바꾸어 경고 상자에 넣습니다.

확인하기 쉬우므로 개발자 콘솔에 붙여 넣기 만하면됩니다.

PHP, 41 자 (+25)

과제를 올바르게 이해했는지 모르겠습니다. 그러나 여기에 PHP 시도가 있습니다.

while(!isset($s) || $s) echo isset($s) ? array_pop($s) : ($s = str_split(file_get_contents(__FILE__)) and null);

편집 : 이것은 훨씬 짧을 수 있습니다 :

echo strrev(file_get_contents(__FILE__));

그러나 그것이 간단 할 수 있기 때문에 이것은 아마도 묻고있는 것이 아닙니다 ...

MATLAB, 78 자 :

 
|
.snoisserpxe ro stnemetats BALTAM ni dilav ton si retcarahc tupni ehT :rorrE

이 솔루션을 사용하려면 특수 문자 (alt + 0160)로 시작해야하며 반전 된 메시지를 정확하게 인쇄해야합니다. (파이썬 솔루션과 달리)

유닉스 쉘, 31

52 자 실제 솔루션 :

A='printf "A$ lave;\047`echo $A|rev`\047=A"';eval $A

그러나 조심하십시오! 정직은 오늘날의 세상에서 돈을 지불하지 않습니다! 페널티가 너무 낮습니다 !!

6 자 + 25 = 31 :

rev $0

MS-DOS, 24 바이트

eman elif ro dnammoc daB

산출:

Bad command or file name

자바 스크립트, 62

function f(){alert((f+'f()').split('').reverse().join(''))}f()

최신 Chrome (v 31.0.1650.63)에서 작동합니다. 일부 다른 브라우저는 다른 출력을 제공 할 수 있습니다. (출력을 반대로 바꾸면 작동합니다. : P)

SmileBASIC, 118 102 바이트

FOR I=-101TO.?MID$(("+CHR$(34))*3,30,102)[-I];:NEXTFOR I=-100TO.?MID$(("+CHR$(34))*3,30,102)[-I];:NEXT

자바 스크립트, 56

($=_=>_!=$._?_?$(_.slice(1))+_[0]:')':$('($='+$+')('))()

CSS, 88 바이트

<style>:before,*{display:block;unicode-bidi:bidi-override;direction:rtl;content:'<style>

다른 태그와의 충돌을 피하려면 빈 HTML 페이지를 넣으십시오.

자바 스크립트, 53 50 46 43 바이트

q=_=>("q="+q+";q()").split("").reverse().join("");q()

(q=_=>`(q=${q})()`.split("").reverse().join(""))()

(q=_=>`(q=${q})()`.split``.reverse().join``)()

(q=_=>[...`(q=${q})()`].reverse().join``)()

이것을 짧게 도와주세요.

퍼지 옥토 과카 몰리, 4 바이트

KNU_

K인쇄 _UNK, N밀기 None및 U밀기 0. 그리고 _스택의 최상위 값을 표시합니다 (그러나 인쇄하지는 않습니다). _UNK인쇄 만됩니다 .