Tantangan ini memiliki dua utas. Ini adalah utas polisi. Utas perampok terletak di sini .

Tantangan Anda adalah memilih urutan OEIS dan menulis dua program lengkap dalam dua bahasa berbeda yang menghasilkan item ke-n dalam urutan ketika diberi dan melalui STDIN, atau bentuk lain dari input standar, di mana n adalah angka positif. Namun kedua program Anda harus berupa anagram, artinya masing-masing dapat disusun ulang dari surat yang lain.

Program harus menampilkan desimal angka yang diikuti oleh spasi kosong opsional ke STDOUT. Program dapat menghasilkan STDERR namun harus diabaikan dan jika kasing tersembunyi harus dinyatakan dengan jelas bahwa inilah kasingnya.

Jika mau, Anda juga dapat menampilkan berdasarkan kode karakter. Namun jika Anda melakukannya di solusi tersembunyi Anda, Anda harus menyatakan seperti itu di tubuh kiriman Anda.

Anda kemudian akan menampilkan nomor OEIS, kode sumber untuk dan nama satu bahasa yang digunakan.

Perampok akan memecahkan kiriman Anda jika mereka menemukan sebuah anagram dari kiriman asli yang berjalan dalam bahasa selain yang sudah Anda sajikan. Untuk memecahkan sebuah jawaban, mereka hanya harus menemukan bahasa dan program apa pun yang menghasilkan urutan dan merupakan anagram dari aslinya, belum tentu jawaban yang Anda pikirkan.

Dengan demikian Anda diberi insentif untuk membuatnya sesulit mungkin untuk menemukan bahasa apa pun yang melakukan tugas menggunakan daftar simbol mereka.

Mencetak gol

Ini adalah kode-golf sehingga program un-crack terpendek adalah pemenangnya.

Bahasa

Bahasa akan dianggap berbeda jika dua solusi yang diusulkan tidak menyelesaikan tugas dalam kedua bahasa. Ini akan mencakup versi yang berbeda dari bahasa yang sama selama solusi polisi atau solusi perampok tidak menghasilkan output yang benar dalam bahasa yang lain.

yaitu jika ada dua solusi 1 dan 2 yang dalam bahasa A dan B masing-masing solusi 2 tidak harus menghasilkan output yang benar dalam bahasa A dan solusi 1 tidak harus menghasilkan output yang benar dalam bahasa B.

Keamanan

Setelah kiriman Anda dilacak selama seminggu, Anda dapat memposting solusi Anda dan menyatakan kiriman Anda aman. Jika setelah seminggu Anda memilih untuk tidak memposting solusi, jawaban Anda mungkin masih retak.

Python 2, 118 byte, A042545 Retak

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|

Saya tidak merasa ingin menerapkan urutan yang sepele, jadi saya memutuskan untuk menggunakan ID pengguna PPCG saya. Saya menulis ini dalam bahasa lain terlebih dahulu, yang seharusnya memberi Anda petunjuk tentang apa bahasa itu, meskipun saya berani bertaruh 100 dolar bahwa ini akan retak dalam bahasa golf sebelum retak dalam bahasa lain yang dimaksud.

Catatan: Karena kesalahan presisi floating-point, ini hanya akurat hingga input 14. Solusi yang dimaksud adalah cara yang sama.

Solusi yang dimaksudkan, 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

Bekerja dengan cara yang hampir sama dengan solusi Python, meskipun urutannya disimpan terbesar-pertama daripada terkecil-pertama karena fakta bahwa JS tidak mendukung pengindeksan negatif.

Brain-Flak, 24 byte, A000290 , Aman

Namun solusi persegi lain. Kali ini tidak ada apa-apa selain tanda kurung

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

Solusi yang dimaksud adalah di Brain-Flueue , versi brain-flak yang menggunakan antrian alih-alih tumpukan. Programnya adalah:

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

Bahasa dianggap berbeda karena tidak satu pun dari kedua program tersebut berhenti ketika dijalankan dalam bahasa lain.

Python 2, 38 byte, A000290 Dipecahkan oleh Emigna

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

Ini mungkin akan sangat mudah retak. Saya kebanyakan memposting ini sebagai titik awal.

Solusi orisinal di CJam:

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

CJam , 7 byte, A005843 Retak!

ri2*e#^

Ini adalah 2*nurutan dasar .

Penjelasan:

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

Cobalah online!

Solusi Asli, Wortel

#^i*2er

Wortel adalah esolang yang dibuat oleh saya. Saya sudah berhenti mengembangkannya sejak lama. Alasan saya memilih ini adalah karena saya berharap akan sulit bagi bahasa lain untuk berkomentar tentang bagian kode yang tidak perlu.

Penjelasan:

#^            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

Cobalah online!

2sable , 15 byte, A000290 , Cracked!

Melompat di kereta yang sama n ² : hal.

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

Cobalah online!

Brain-Flak, 44 byte, A000290 Retak

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

Cobalah online!

Solusi asli, Python 2

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

Excel, 12 byte, A000012 Retak

=IF(1=1,1,1)

Mungkin bukan yang terberat, tapi yang menyenangkan untuk dipecahkan.

Python 2, 25 byte, A000583 , sudah di- crack

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

Program ini keluar dengan kesalahan setelah mencetak output.

Kode tersembunyi saya (jauh berbeda dari solusi yang di-crack!):

Sebenarnya , 25 byte

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

Cobalah online!

Penjelasan:

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 , Aman

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])

Kali ini berfungsi dalam 2 dan 3. Dan tidak ada komentar! Apa yang akan kamu lakukan?

Catatan: Seperti solusi lama, ini kehilangan presisi setelah 15 istilah pertama karena kesalahan aritmatika floating-point.

Solusi yang dimaksudkan, 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])   

Meskipun saya menyimpan beberapa versi lama, saya entah bagaimana berhasil kehilangan salinan ini , tetapi untungnya mengumpulkannya bersama yang lain tidak terlalu sulit. Saya melihat sekarang bahwa saya memiliki tambahan prtdi kedua program yang bisa bermain golf. Baiklah.

Python 2, 124 byte, A144945 , [Aman]

Memecahkan ini akan memberi Anda hadiah 500 rep! Sangat terlambat!

Jumlah cara untuk menempatkan 2 ratu pada papan catur sehingga mereka saling serang.

Saya harap itu tidak terlalu mudah. Saya mengatur kode saya sehingga ruang kosong terlihat jelas. Itu hanya spasi dan baris baru.

_{Catatan: output solusi yang dimaksud melalui kode karakter}

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

Cobalah online

Solusi yang Dimaksud, Headecks :

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

Ini setara dengan program BF berikut:

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

Fuzzy Octo Guacamole, 26 bytes, A070627 [Aman]

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

Kasus uji:

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

Larutan:

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

Bekerja di Magistack.

Pyth, 75 byte, A004526 Retak, susu

Lebih dari tes main-main dari apa pun, tetapi:

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

Cobalah online!

Solusi Milk (Cembung):

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;

Cobalah online

Solusi yang dimaksudkan (///):

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

Cobalah online

Mengambil input dalam bentuk 2 sebelum titik koma terakhir dan menampilkan jumlah Q yang benar.

Urutannya adalah 0-diindeks (yaitu 0 adalah 0, 1 adalah 0, 2 adalah 1, ...)

Ditemukan sedikit kesalahan sintaksis di ///, jadi edit semua solusi.

MATL, 7 byte, A000217 , retak

:sp{1}x

Urutannya adalah n(n+1)/2(angka segitiga), mulai dari masukan n=1seperti yang ditentukan oleh tantangan: 1, 3, 6, 10, ... (Output untuk input 0tidak dijamin sama di dua program).

Program dalam bahasa lain keluar dengan kesalahan (setelah menghasilkan output yang benar dalam STDOUT).

Cobalah online!

:            % 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 , Retak

Tidak ada input saat ini!

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

Indentasi adalah tab, tetapi tidak untuk menyimpan byte - mereka diperlukan untuk spasi putih.

Saya pikir itu tidak memerlukan tautan atau penjelasan TIO!

(Mungkin tidak akan lama untuk retak dalam beberapa cara)

Jawaban yang dimaksudkan (Whitespace):

-Start-


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

(Mulai dan akhiri bukan bagian dari program)

Maaf, saya lupa menambahkan bahwa ia mencetak ke STDERR:

Cobalah online!

Fuzzy Octo Guacamole , 11 byte, A001844 [Aman!]

hha02^d+**+

Retak yang semacam itu bekerja dh*h++^2*0a, di Pyth. Ini bukan format output yang tepat.

Kode saya masih di luar sana! (dan itu tidak di Pyth)

Kasus uji:

0 -> 1
1 -> 5

Larutan:

^++d0ah*2*h

Di Jolf.

WinDbg, 39 byte, A000007 Cracked oleh jimmy23013

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

Urutan sulit 0**n.

Input dilakukan dengan melewatkan nilai dalam register semu $t0.

Solusi asli saya adalah C #:

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

JavaScript ES6, 38 byte, A000290 , Retak

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

Kereta persegi ini cukup bagus, tetapi tidak cepat kemana-mana. (Dapatkan itu? Kereta persegi ? Seperti di dalam, roda? Tidak? Oke, baiklah. Kritik .)

Jawaban yang dimaksudkan: Reticular ( Coba online! ),

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 Retak!

i:"@ax'1']
v!

Cobalah online!

Penjelasan:

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 , Retak!

Berharap saya tidak melewatkan sesuatu. Menghitung a (n) = n × (n + 1) :

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

Versi saya:

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

Atau versi yang tidak dilipat:

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

Perhatikan bahwa >di sudut kiri atas tidak digunakan (kecuali untuk program 2sable). Saya melakukan ini untuk membingungkan para perampok (tapi itu jelas tidak berhasil haha).

Cobalah online!

2sable, 15 byte, A087156

D1QiA0*<}.;2->>

Cobalah online

Urutan angka non-negatif, kecuali untuk 1.

Befunge 93 , 14 bytes, A121377 , Retak karena susu !

&52* %68*+ .@Q

Fakta menyenangkan: Solusi yang dimaksudkan untuk ini adalah pertama kalinya saya menggunakan bahasa itu.

Solusi saya di Pyth. & @ cetak kesalahan, tetapi STDERR yang menurut OP diabaikan.

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

Python 2, 35 byte, A048735 , Aman

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

Solusi asli adalah dalam bahasa pemrograman saya sendiri Wise .

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

Sebagian besar karakter adalah no-ops yang tidak relevan. Karakter penting adalah enam pertama. :membuat dua salinan dari item pertama di tumpukan. <<>bit bergeser dua kali ke kiri dan sekali ke kanan yang setara dengan menggeser satu kali ke kiri. &mengambil bitwise dan item teratas dan kedua (salinan asli dan bit bergeser). >Bit terakhir bergeser satu kali ke kanan.

05AB1E, 5 byte, A000012 , Aman

$;$1?

Urutan 1. Cobalah online

Solusi yang Dimaksudkan: Arcyou

1;$$?

Cobalah online . Saya tidak dapat menemukan dokumentasi untuk bahasa ini, jadi tidak memiliki penjelasan tentang cara kerjanya.

Python 2, 70 Bytes, A000217 Retak!

Saya merasa ini tidak akan retak dalam bahasa yang saya gunakan untuk versi lain, kita akan lihat :)

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


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

Saya menyadari setelah itu saya salah mengaburkan kode (itu tidak mengubah validitas jawaban yang diposting). Berikut kode yang saya mulai dengan di Haystack:

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

05AB1E , 9 byte, A000042 Retak!

1×,1*-^$)

Ini adalah representasi bilangan asli Unary (OEIS). Jadi jika inputnya 3, misalnya, maka output akan menjadi 111.

Penjelasan:

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

Cobalah online!

Solusi Asli, Wortel

1^*$-1×^)

Penjelasan

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

The *mengalikan string dengan (n+1)kali, sehingga a^*3menghasilkan aaaadan tidak aaa. Jadi itu sebabnya saya mengurangi 1input.

Baru sekarang saya menyadari bahwa )keduanya tidak relevan di kedua bahasa: D

Cobalah online!

J, 2 byte, A000290 , Retak

*~

Yah, sebaiknya mulai untuk dua byters itu. Menghasilkan n × n , atau n ² .

solusi yang dimaksudkan, Jolf, 2 byte

*~

Baik. Ya. Ini adalah bahasa saya sendiri dan saya pikir itu berfungsi karena ~mencari karakter yang diperluas, tetapi tidak menemukan satu, jadi itu hanya mengabaikannya. ¯ \ _ (ツ) _ / ¯ Ups.

ABCR , 24 byte, A023443 Retak!

70: Quit xi. Classy queue!

Ada banyak no-ops. Menghitung n - 1.

05AB1E, 8 byte, A000042 , Retak

F1}J,(1&

Kasus uji:

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

Ouroboros , 6 byte, A000012 Retak

)49.o(

Selalu menghasilkan 1.