Thử thách này có hai chủ đề. Đây là chủ đề của cảnh sát. Chủ đề của bọn cướp nằm ở đây .

Thử thách của bạn là chọn một chuỗi OEIS và viết hai chương trình đầy đủ bằng hai ngôn ngữ khác nhau tạo ra mục thứ n đó trong chuỗi khi được n thông qua STDIN hoặc một dạng đầu vào tiêu chuẩn khác, trong đó n là bất kỳ số dương nào. Tuy nhiên, hai chương trình của bạn phải là đảo chữ cái, nghĩa là mỗi chương trình có thể được sắp xếp lại từ các chữ cái khác.

Các chương trình phải xuất số thập phân của số theo sau là khoảng trắng tùy chọn cho STDOUT. Các chương trình có thể xuất ra STDERR tuy nhiên cần bỏ qua và nếu trường hợp ẩn làm như vậy thì phải ghi rõ rằng đây là trường hợp.

Nếu bạn muốn bạn cũng có thể xuất ra theo mã ký tự. Tuy nhiên nếu bạn làm như vậy trong giải pháp ẩn của bạn, bạn phải nêu rõ như vậy trong phần nội dung của bạn.

Sau đó, bạn sẽ trình bày số OEIS, mã nguồn và tên của một ngôn ngữ.

Những tên cướp sẽ bẻ khóa bài đăng của bạn nếu chúng tìm thấy đảo chữ của bài dự thi ban đầu chạy bằng ngôn ngữ khác với ngôn ngữ bạn đã trình bày. Để bẻ khóa một câu trả lời, họ chỉ phải tìm bất kỳ ngôn ngữ và chương trình nào tạo ra chuỗi và là đảo chữ của bản gốc, không nhất thiết là câu trả lời mà bạn đang nghĩ đến.

Do đó, bạn được khuyến khích làm cho nó khó nhất có thể để tìm bất kỳ ngôn ngữ nào thực hiện nhiệm vụ bằng cách sử dụng danh sách các ký hiệu của chúng.

Chấm điểm

Đây là môn đánh gôn, vì vậy chương trình không bị bẻ khóa ngắn nhất là người chiến thắng.

Ngôn ngữ

Ngôn ngữ sẽ được coi là khác nhau nếu hai giải pháp được đề xuất không hoàn thành nhiệm vụ trong cả hai ngôn ngữ. Điều này sẽ bao gồm các phiên bản khác nhau của cùng một ngôn ngữ miễn là giải pháp của cảnh sát hoặc giải pháp của kẻ cướp tạo ra đầu ra chính xác trong ngôn ngữ của người khác.

tức là Nếu có hai giải pháp 1 và 2 theo ngôn ngữ A và B thì giải pháp 2 không được tạo ra đầu ra đúng trong ngôn ngữ A và giải pháp 1 không được tạo ra đầu ra chính xác trong ngôn ngữ B.

Sự an toàn

Khi bài đăng của bạn đã bị hủy bỏ trong một tuần, bạn có thể đăng giải pháp của mình và tuyên bố bài đăng của bạn an toàn. Nếu sau một tuần bạn chọn không đăng một giải pháp, câu trả lời của bạn vẫn có thể bị bẻ khóa.

Python 2, 118 byte, A042545 Cracked

i=input();s=1/(801**.5-28);a=[0,1]
for p in range(i):a+=[a[-2]+a[-1]*int(s)];s=1/(s-int(s))
print a[i]#,,,.//000fhlmo|

Tôi không cảm thấy muốn thực hiện một chuỗi tầm thường, vì vậy tôi quyết định sử dụng ID người dùng PPCG của mình. Tôi đã viết thứ này bằng ngôn ngữ khác trước, nó sẽ cho bạn manh mối về ngôn ngữ đó là gì, mặc dù tôi đã đặt cược 100 đô la rằng ngôn ngữ này sẽ bị bẻ khóa trong ngôn ngữ chơi golf trước khi nó bị bẻ khóa trong ngôn ngữ khác.

Lưu ý: Do lỗi chính xác của dấu phẩy động, điều này chỉ chính xác cho đến đầu vào là 14. Giải pháp dự định là cùng một cách.

Giải pháp dự định, JavaScript (ES7)

for(i=prompt(),s=1/(801**.5-28),a=[1,0];i--;s=1/(s-n))
  n=s|0,a.unshift(a[1]+a[0]*n);
alert(a[0])  //#+2:[]giiiiinnpt

Hoạt động theo cách tương tự như giải pháp Python, mặc dù chuỗi được lưu trữ lớn nhất trước tiên thay vì nhỏ nhất do thực tế là JS không hỗ trợ lập chỉ mục tiêu cực.

Brain-Flak, 24 byte, A000290 , An toàn

Một giải pháp vuông khác. Lần này không có gì ngoài dấu ngoặc đơn

({(({}[()])()){}[()]}{})

Giải pháp dự định là trong Brain-Flueue , một phiên bản của bộ não sử dụng hàng đợi thay vì ngăn xếp. Chương trình là:

({(({})[()]){}}{})[()()]

Các ngôn ngữ được coi là khác biệt vì cả hai chương trình đều không dừng lại khi chạy bằng ngôn ngữ kia.

Python 2, 38 byte, A000290 đã bị bẻ khóa bởi Emigna

def e(X):return X*X
print e(input())##

Điều này có lẽ sẽ rất dễ bị nứt. Tôi chủ yếu đăng bài này như một điểm khởi đầu.

Giải pháp ban đầu trong CJam:

ri:XX*e#def ()return X
e#pnt (input())

CJam , 7 byte, A005843 đã bị bẻ khóa !

ri2*e#^

Đây là một 2*nchuỗi cơ bản .

Giải trình:

r          e# read input
 i         e# convert to integer
  2*       e# multiply it by 2
    e#^    e# this is a comment that is ignored by the interpreter

Hãy thử trực tuyến!

Giải pháp ban đầu, cà rốt

#^i*2er

Cà rốt là một esolang được tạo ra bởi tôi. Tôi đã ngừng phát triển nó từ lâu. Lý do tôi chọn điều này là vì tôi hy vọng rằng các ngôn ngữ khác sẽ khó nhận xét các phần không cần thiết của mã.

Giải trình:

#^            This pushes the input to the stack (anything before the ^ is the stack)
  i           Convert stack to integer
   *2         Multiply it by 2
     er       These are ignored because they are not Carrot commands
              Implicit output

Hãy thử trực tuyến!

2sable , 15 byte, A000290 , Cracked!

Nhảy lên cùng một chuyến tàu n ² : p.

*?"!#$&<=@\^{|}

Hãy thử trực tuyến!

Brain-Flak, 44 byte, A000290 Cracked

<({({})({}[()])}{}))()()()turpentine/"*"*4splint>

Hãy thử trực tuyến!

Giải pháp gốc, Python 2

print(input()**(len(set("{}{}{}[]()<>"))/4))

Excel, 12 byte, A000012 Cracked

=IF(1=1,1,1)

Có lẽ không phải là khó khăn nhất, nhưng là một niềm vui để crack.

Python 2, 25 byte, A000583 , đã bị bẻ khóa

Y=input("");print`Y**4`,X

Chương trình này thoát với một lỗi sau khi in đầu ra.

Mã ẩn của tôi (khác biệt đáng kể với giải pháp bẻ khóa!):

Trên thực tế , 25 byte

4,n`*`Y")ii(*nppruttY;="X

Hãy thử trực tuyến!

Giải trình:

4,n`*`Y")ii(*nppruttY;="X
4,n                        input, repeat 4 times
   `*`Y                    do * until the stack stops changing (fixed-point combinator)
       ")ii(*nppruttY;="X  push this string and immediately pop and discard it

Python, 118 byte, A042545 , An toàn

i=int(input());s=pow(801.0,0.5);a=[0|0,1]
for Moshprtflmah in range(i):s=1./(s%1);a+=[a[-2]+a[-1]*int(s)];
print(a[i])

Lần này nó hoạt động ở cả 2 và 3. Và không có bình luận nào! Bạn sẽ làm gì?

Lưu ý: Như với giải pháp cũ, điều này mất độ chính xác sau 15 thuật ngữ đầu tiên do lỗi số học dấu phẩy động.

Giải pháp dự định, JavaScript (ES6)

giiiiinnnnprt:
i=prompt([n=+2]);s=Math.pow(801,.5);for(a=[1,0];i--;a.unshift(a[1]+a[0]*(s|0)))s=1/(s%1)
alert(a[0])   

Mặc dù tôi đã giữ một số phiên bản cũ, nhưng bằng cách nào đó tôi đã xoay sở để mất bản sao này , nhưng may mắn thay, ghép nó từ những phiên bản khác không quá khó. Bây giờ tôi thấy rằng tôi đã có một ngoại lệ prttrong cả hai chương trình có thể đã được đánh gôn. Ồ tốt

Python 2, 124 byte, A144945 , [An toàn]

Bẻ khóa này sẽ kiếm được cho bạn một khoản tiền thưởng 500 rep! Quá muộn!

Số cách đặt 2 nữ hoàng trên bàn cờ n X n để chúng tấn công lẫn nhau.

Tôi hy vọng nó không quá dễ dàng. Tôi đã sắp xếp mã của mình để khoảng trắng được nhìn thấy rõ ràng. Đó chỉ là không gian và dòng mới.

_{Lưu ý: đầu ra giải pháp dự định thông qua mã ký tự}

n=input();print((3+2)*n*n+~0*6*n+1)*n/3;            +6;



























+7+7+7+7+7+7+7+7+7;+++++++++++++++9+9*9*9

Dùng thử trực tuyến

Giải pháp dự định, Headsecks :

r2=ni***p**
(


p((0 ;3+++3;+;/


)





i+++nn
 +)7
n

n+++ 


17+~
 +)7;97++++7


69+9n+ ++7+n 69
 +7+ ++7


**7+++tut

Điều này tương đương với chương trình BF sau:

>>,[->>>+>>>+>>>+++++<<<<<<<<<]>>>->>>>>>-<<<[[>+<-]>[>>[<<<+>>+>-]<[>+<-]<-]<<<<]>>+++>[-<-[<+<<]<[+[->+<]<+<<]>>>>>]<<<.,.

Fuzzy Octo Guacamole, 26 byte, A070627 [An toàn]

49++*5^pm#]%:"?:.=:#,|"1:@

Các trường hợp thử nghiệm:

1 -> 1
3 -> 23
5 -> 1

Giải pháp:

^::::|*?1=#@]","%.#49++5pm

Hoạt động trong Magistack.

Pyth, 75 byte, A004526 Cracked, sữa

Nhiều hơn một bài kiểm tra vui tươi hơn bất cứ điều gì, nhưng:

/Q/////////////////****22222 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2;;;;;

Hãy thử trực tuyến!

Dung dịch sữa (lồi):

2/Q2 2/2/2/2/2/2/2/2/2/2/2/2/2/2/2/2/2/2*2*2*; 2*;                 2; 2; 2;

Dùng thử trực tuyến

Giải pháp dự định (///):

/*///;2/;// ///22/Q//2;///;//;***2222222222222222222222                    

Dùng thử trực tuyến

Đưa đầu vào ở dạng 2 trước dấu chấm phẩy cuối cùng và xuất ra số Q chính xác.

Chuỗi được lập chỉ mục 0 (tức là 0 là 0, 1 là 0, 2 là 1, ...)

Tìm thấy lỗi cú pháp nhỏ trong ///, vì vậy đã chỉnh sửa tất cả các giải pháp.

MATL, 7 byte, A000217 , bị nứt

:sp{1}x

Trình tự là n(n+1)/2(số tam giác), bắt đầu từ đầu vào n=1theo quy định của thách thức: 1, 3, 6, 10, ... (Output cho đầu vào 0không đảm bảo là giống nhau trong hai chương trình).

Chương trình trong ngôn ngữ khác thoát lỗi (sau khi tạo đầu ra chính xác trong STDOUT).

Hãy thử trực tuyến!

:            % Push [1 2 ... n], where n is implicit input
 s           % Sum of that array. Gives the desired result
   p         % Product of that. Gives the same number
    {1}      % Push a cell array containing number 1
       x     % Delete it

Python 2, 37 byte, A000290 Cracked

print(input()**(1+1))
"'10°3¢','m'"

Python 3, 27 byte, A000012 , Cracked

Không có đầu vào lần này!

if 1:
    if 1:
        print( '1' )

Các thụt lề là các tab, nhưng không lưu byte - chúng được yêu cầu cho khoảng trắng.

Tôi không nghĩ rằng nó cần một liên kết hoặc giải thích TIO!

(Có lẽ sẽ không mất nhiều thời gian để bẻ khóa theo một cách nào đó)

Câu trả lời dự định (Khoảng trắng):

-Start-


    if1:if1:print('1')
-End-

(Bắt đầu và kết thúc không phải là một phần của chương trình)

Xin lỗi, tôi quên thêm rằng nó được in vào STDERR:

Hãy thử trực tuyến!

Fuzzy Octo Guacamole , 11 byte, A001844 [An toàn!]

hha02^d+**+

Một vết nứt mà loại công trình là dh*h++^2*0a, trong Pyth. Đây không phải là định dạng đầu ra đúng.

Mã của tôi vẫn còn đó! (và nó không ở Pyth)

Các trường hợp thử nghiệm:

0 -> 1
1 -> 5

Giải pháp:

^++d0ah*2*h

Trong Jolf.

WinDbg, 39 byte, A000007 đã bị bẻ khóa bởi jimmy23013

~e.block{j(0>=@$t0)?@$t0+(1<7);??0}t":"

Trình tự khó khăn của 0**n.

Đầu vào được thực hiện bằng cách chuyển một giá trị trong thanh ghi giả $t0.

Giải pháp ban đầu của tôi là C #:

@t=>(object)(0<@t?0:1)??"$$700~lk.{}+";

Javascript ES6, 38 byte, A000290 , Cracked

J=>eval(Array(J).fill(J).join`+`)|2-2;

Chuyến tàu vuông này khá tiện lợi, nhưng không đi đâu nhanh cả. (Nhận nó? Tàu vuông ? Như trong, bánh xe? Không? Được, tốt. Các nhà phê bình .)

Câu trả lời dự định: Reticular ( Dùng thử trực tuyến! ),

in2Jo;=>eval(Array(J).fill(J).j`+`)|-2
in      take input, convert to number
  2J    raise to the second power
    o;  output and terminate; ignores following chars

MATL , 13 byte, A002275 đã bị bẻ khóa !

i:"@ax'1']
v!

Hãy thử trực tuyến!

Giải trình:

i           % Grab input
 :          % Push (range(1,input))
  "         % For each element in this range:
   @        %   Push it
    a       %   Is is truthy?
     x      %   Delete it
      '1'   %   Push '1'
         ]  %   End loop
v           % Join all of these '1's together
 !          % Transpose and display

2sable , 13 byte, A002378 , Cracked!

Hy vọng tôi đã không bỏ lỡ điều gì. Tính a (n) = n × (n + 1) :

>*?"!&)<=@\\}

Phiên bản của tôi:

?"\>@&*})<\=!

Hoặc phiên bản mở ra:

  ? " \
 > @ & *
} ) < \ =
 ! . . .
  . . .

Lưu ý rằng >ở góc trên bên trái không được sử dụng (ngoại trừ chương trình 2sable). Tôi đã làm điều này để gây nhầm lẫn cho bọn cướp (nhưng rõ ràng điều đó không hiệu quả haha).

Hãy thử trực tuyến!

2sable, 15 byte, A087156

D1QiA0*<}.;2->>

Dùng thử trực tuyến

Chuỗi các số không âm, ngoại trừ 1.

Befunge 93 , 14 byte, A121377 , bị nứt bởi sữa !

&52* %68*+ .@Q

Sự thật thú vị: Giải pháp dự định cho việc này là lần đầu tiên tôi sử dụng ngôn ngữ đó.

Giải pháp của tôi ở Pyth. & @ in một lỗi, nhưng điều đó xảy ra với STDERR mà theo OP bị bỏ qua.

+%Q*5 2*6 8.&@

Python 2, 35 byte, A048735 , An toàn

print(lambda u:u&u<<1)(input())>>1

Các giải pháp ban đầu là trong ngôn ngữ lập trình của riêng tôi khôn ngoan .

:<<>&>print(lambda uuu1)(input())1

Hầu hết các nhân vật là không-không liên quan. Các nhân vật quan trọng là sáu đầu tiên. :tạo hai bản sao của mục đầu tiên trên ngăn xếp. <<>bit dịch chuyển hai lần sang trái và một lần sang phải, tương đương với bit dịch chuyển một lần sang trái. &lấy bitwise và của mục trên cùng và thứ hai (bản gốc và bản sao được dịch chuyển bit). Cuối cùng >bit dịch chuyển một lần sang phải.

05AB1E, 5 byte, A000012 , An toàn

$;$1?

Trình tự của 1. Dùng thử trực tuyến

Giải pháp dự định: Arcyou

1;$$?

Hãy thử trực tuyến . Tôi không thể tìm thấy tài liệu cho ngôn ngữ này, vì vậy đừng có giải thích về cách nó hoạt động chính xác.

Python 2, 70 byte, A000217 đã bị bẻ khóa !

Tôi có cảm giác điều này sẽ không bị bẻ khóa trong ngôn ngữ tôi đã sử dụng cho phiên bản khác, chúng ta sẽ thấy :)

o=input()
v=0
i=1
while o:
 v+=i
 i+=1
print v


#|  d00->1@@@++-^,,[

Tôi nhận ra sau đó tôi đã làm xáo trộn mã không chính xác (nó không thay đổi tính hợp lệ của câu trả lời được đăng). Đây là mã tôi đã bắt đầu với Haystack:

v
0
v
0
i
1
-
>      d0[v
^-1@+@d+1@?,,o|

05AB1E , 9 byte, A000042 đã bẻ khóa !

1×,1*-^$)

Đây là đại diện Unary của số tự nhiên (OEIS). Vì vậy, nếu đầu vào là 3, ví dụ, thì đầu ra sẽ là 111.

Giải trình:

                    # implicit input
1                   # pushes 1 to the stack   
 ×                  # pushes "1" × (the input)
  ,                 # outputs the stack
   1*-^$)           # irrelevant

Hãy thử trực tuyến!

Giải pháp ban đầu, cà rốt

1^*$-1×^)

Giải trình

1^             Push "1" to the stack
  *            Multiply the string by
   $-1         ...the input (as an integer) minus 1 times
      ×,)      Ignored by the interpreter

Nhân *chuỗi theo (n+1)thời gian, do đó a^*3kết quả aaaavà không aaa. Vì vậy, đó là lý do tại sao tôi trừ đi 1đầu vào.

Chỉ bây giờ tôi nhận ra rằng điều đó )không liên quan đến cả hai ngôn ngữ: D

Hãy thử trực tuyến!

J, 2 byte, A000290 , Cracked

*~

Chà, cũng có thể bắt đầu đi cho hai người đó. Năng suất n × n , hoặc n ² .

giải pháp dự định, Jolf, 2 byte

*~

Tốt. Vâng. Đây là ngôn ngữ của riêng tôi và tôi nghĩ nó hoạt động vì ~tìm kiếm một nhân vật mở rộng, nhưng không tìm thấy một ngôn ngữ nào, vì vậy nó chỉ bỏ qua nó. ¯ \ _ (ツ) _ / Rất tiếc.

ABCR , 24 byte, A023443 đã bị bẻ khóa !

70: Quit xi. Classy queue!

Có một loạt các no-op. Tính toán n - 1.

05AB1E, 8 byte, A000042 , Cracked

F1}J,(1&

Các trường hợp thử nghiệm:

1 -> 1
2 -> 11
3 -> 111

Ouroboros , 6 byte, A000012 Cracked

)49.o(

Luôn luôn đầu ra 1.