Viết chương trình in mã nguồn của chính nó ra phía sau, nói cách khác là eniuq .

Ghi điểm:

• +50 nếu bạn sử dụng dữ liệu kéo từ Internet.
• +25 nếu bạn đọc mã nguồn của riêng bạn.
• +1 điểm cho mỗi nhân vật
• Điểm số thấp nhất chiến thắng.

Quy tắc:

• Không sử dụng các tệp khác (ví dụ reverse.txt)
• Độ dài mã tối thiểu là hai ký tự.
• Chương trình của bạn không thể là một bảng màu.

GolfScript - 2

1

(tức là \n1nơi \nlà kí tự xuống dòng)

Đầu ra:

1

(tức là 1\n)

Để trích dẫn Ilmari :

GolfScript tự động nối thêm một dòng mới vào cuối đầu ra

Do đó, một dòng mới theo sau là một số sẽ in số theo sau là một dòng mới.

Huh? , 5 ký tự

!hcuO

Tôi thực sự KHÔNG biết nó hoạt động như thế nào, nhưng nếu bạn tải xuống trình thông dịch, và nếu bạn viết !hcuO, thì bạn sẽ nhận đượcOuch!

Để chạy cái này, bạn cần thực thi chương trình như thế này:

huh.exe !hcuO

Nó thực sự sẽ tìm một tệp được gọi !hcuO, nhưng nó không tồn tại, vì vậy nó xuất raOuch!

Toán học, 3 ký tự

a 2

a 2có nghĩa là alần 2. Vì vậy, câu trả lời là 2 a.

H9 + , 13 ký tự

!dlrow ,olleH

Như trang web nói, tất cả các nhân vật mà không phải là H, 9hoặc +là bỏ qua, vì vậy chương trình của tôi sẽ inHello, world!

Javascript: 34 ký tự

reifitnedi detcepxenU :rorrExatnyS

đầu ra SyntaxError: Unexpected identifier, ít nhất là trong bảng điều khiển Chrome

Con trăn, 43 41

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

Toán học, 2 byte

1#

Đầu ra:

# 1

TI-CƠ BẢN, 2

i2

Đâu ilà con số tưởng tượng.

Đầu ra 2i

CƠ BẢN, 22 12 7 ký tự

:-)

1 enil ni rorre xatnyS

EDIT: Nếu bạn được phép vào chương trình ở chế độ ngay lập tức, thì điều này có thể được giảm xuống rorre xatnyS(12 ký tự).

Trong BBC BASIC, bạn chỉ cần 7 ký tự:

ekatsiM

C ++ 472 ký tự

Rất nhiều nhân vật nhưng tôi không thể nghĩ ra một cách đơn giản hơn trong ngôn ngữ dựa trên 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#");}

bash

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

Độ dài: 31 ký tự.

sh

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

Độ dài: 29 ký tự.

Cái này không thể hoạt động trên một số bản phân phối Linux, nhưng hoạt động trên OSX.

tcsh

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

Độ dài: 26 ký tự.

csh

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

Độ dài: 26 ký tự.

Người thắng cuộc là:

ksh

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

Độ dài: 21 ký tự.

Ở trên nên hoạt động trên tất cả * hệ điều hành dựa trên unix.

GolfScript, 12 ký tự

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

Mã này lấy chuỗi trích dẫn kép "-1%.`", đảo ngược nó ( -1%), sao chép nó ( .) và un-evals ( `) bản sao thứ hai, khôi phục các dấu ngoặc kép xung quanh nó.

Mục trước (13 ký tự):

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

Dựa trên câu hỏi 8-char {'.~'}.~từ câu trả lời này ; cần thêm 5 ký tự để xâu chuỗi và đảo ngược đầu ra.

Thi thiên Lưu ý rằng GolfScript tự động nối thêm một dòng mới vào cuối đầu ra. Nếu điều này được tính là một phần của đầu ra, một dòng mới tương ứng có thể được thêm vào một trong hai phiên bản mã mà không ảnh hưởng đến đầu ra, với chi phí thêm một char.

Befunge 98 - 10 ký tự

"8k,'!1+,@

Điều này hoạt động nếu trình thông dịch của bạn không diễn giải các dòng được bọc sau khi "thêm một khoảng trắng. Nếu trình thông dịch của bạn không diễn giải các dòng được bọc như thế, thì giải pháp 11 char này hoạt động ( vì các khoảng trắng trùng lặp trong một chuỗi ký tự được hiểu là một ):

"9k,'!1+,@ 

Nếu tôi có thể sử dụng gmà không bị phạt, thì chúng cũng hoạt động (tương ứng 7 và 8 ký tự):

"5k,g,@

và

"6k,g,@ 

Hồng ngọc, 60

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

Dựa trên một quine Ruby cổ điển.

Perl, 41

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

Trả lời 52 ký tự cũ (phạt 27 + 25)

open+0;print ~~ reverse <0>

Đọc nguồn riêng của nó, lưu trữ ngược lại trong một vô hướng và in nó.

Phân hạch , 6 byte

Một trường hợp hiếm hoi của một quine tổng quát có cùng chiều dài với quine bình thường :

"LO+!'

Ý tưởng này giống như của quine thông thường, nhưng chúng tôi đang sử dụng một nguyên tử đi bên trái (bắt đầu từ L) để chế độ in đi qua mã theo thứ tự ngược lại.

J: 26

Chuẩn quining (26 ký tự) : bằng cách xác định hàm và truyền vào định nghĩa của chính nó, trong ngoặc kép:

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

Có lẽ có thể được thực hiện ngắn hơn.

J-Cụ thể (33 ký tự) : bằng cách xác định một biến và hỏi tệp nào được xác định trong đó, tức là tệp này, sau đó in ra nội dung của tệp đó:

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

Phải được lưu và chạy từ một tập lệnh (nghĩa là không có trong REPL, vì khi đó câu trả lời cho câu hỏi là "đối số của bạn không được xác định trong một tệp", vì vậy không có tệp nào để đọc).

> <> , 25 byte

Tôi đã ngạc nhiên khi thấy điều này chưa được thực hiện. :)

...yhsif sllems gnihtemoS

Dán mã ở đây và chạy nó.

.là lệnh Jump, bật xvà ytắt ngăn xếp và di chuyển IP đến (x, y)trong hộp mã. Trong trường hợp này, ngăn xếp trống, do đó, thông báo lỗi duy nhất của ngôn ngữ được in:

Something smells fishy...

Kính hiển vi , 11 byte

Tôi đã phải làm điều này.

0"Caxq"Caxq

Đáng ngạc nhiên, điều này thực sự ngắn hơn so với câu hỏi thực sự ngắn nhất được biết đến của ngôn ngữ. qvà atương đương, ngoại trừ qthêm dấu ngoặc kép trong khi akhông.

JQuery jQuery 119 92 74 70 ký tự

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

Bây giờ sử dụng jQuery, như minitech đã đề xuất trong các nhận xét và đóng gói thủ công <pre><code>để tôi có thể sử dụng text()mà không sợ các khối mã khác trong bài đăng này can thiệp. <h4>Gói thủ công không tương thích với chromeium khi tôi thử nghiệm nó, vì vậy bây giờ nó sẽ hoạt động trong hầu hết các trình duyệt.

Chương trình này, nếu được chạy từ trang này, sẽ tìm thấy khối mã trực tiếp ở trên, đảo ngược nội dung của nó và đặt nó vào một hộp cảnh báo.

Nó đủ dễ để xác minh, chỉ cần dán nó vào bảng điều khiển dev.

PHP, 41 ký tự (+25)

Không biết tôi có hiểu đúng bài tập không. Nhưng đây là một thử PHP:

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

chỉnh sửa: điều này có thể ngắn hơn nhiều:

echo strrev(file_get_contents(__FILE__));

Nhưng vì nó có thể đơn giản như vậy, nên đây có lẽ không phải là điều đang được hỏi ...

MATLAB, 78 ký tự:

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

Lưu ý rằng giải pháp yêu cầu bạn bắt đầu bằng một ký tự đặc biệt (alt + 0160) và nó sẽ in chính xác thông điệp đảo ngược. (Không giống như giải pháp trăn)

Vỏ UNIX, 31

Giải pháp thực sự ở 52 ký tự:

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

Nhưng hãy cẩn thận! Sự trung thực không được đền đáp trong thế giới ngày nay! Mức phạt quá thấp !!

6 ký tự + 25 = 31:

rev $0

MS-DOS, 24 byte

eman elif ro dnammoc daB

Đầu ra:

Bad command or file name

JavaScript, 62

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

Hoạt động với tôi trên Chrome mới nhất (v 31.0.1650.63). Một số trình duyệt khác có thể cung cấp một đầu ra khác. (Nếu bạn đảo ngược đầu ra đó, thì nó sẽ hoạt động: P)

SmileBASIC, 118 102 byte

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

JavaScript, 56

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

CSS, 88 byte

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

Đặt trong một trang html trống để tránh xung đột với các thẻ khác.

JavaScript, 53 50 46 43 byte

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``)()

Xin hãy giúp tôi rút ngắn điều này lên.

Fuzzy Octo Guacamole, 4 byte

KNU_

Kin _UNK, Nđẩy None, và Uđẩy 0. Và _bật giá trị hàng đầu trên ngăn xếp (nhưng không in). Vì vậy, chỉ _UNKđược in.