To jest policjanci i złodziejewyzwanie Wątek gliniarzy można znaleźć tutaj

Twoje wyzwanie, jako złodziei, polega na pobraniu danych wyjściowych z wątku gliniarzy i znalezieniu anagramów danych wyjściowych, które po uruchomieniu jako wyjście programowe dostarczają oryginalne dane wyjściowe.

Zwycięzcą zostanie osoba z najbardziej poprawnymi pęknięciami w tym pytaniu.

Zasady

• Nie można łamać odpowiedzi oznaczonych jako bezpieczne za pomocą dostarczonego programu.

• Jeśli policjant zapewnia język, w którym znajduje się zamierzone rozwiązanie, musisz go złamać w tym konkretnym języku, jeśli tego nie zrobisz, możesz go złamać w dowolnym języku konkurencyjnym.

• Obowiązują standardowe zasady dotyczące Quines.

• Pęknięcia nie mogą być idealne Quines. tzn. nie mogą wyprowadzać swojego dokładnego źródła, ale zmienić jego kolejność (kolejność zapewnia policjant).

Nieokreślony język (CJam), 254 bajty, DJMcMayhem

0000000: 3235 362c 583e 3130 2d5b 445d 2f41 612a  256,X>10-[D]/Aa*
0000010: 3a63 6523 0102 0304 0506 0708 090b 0c0e  :ce#............
0000020: 0f10 1112 1314 1516 1718 191a 1b1c 1d1e  ................
0000030: 1f20 2122 2425 2627 2829 2b2e 3334 3738  . !"$%&'()+.3478
0000040: 393b 3c3d 3f40 4243 4546 4748 494a 4b4c  9;<=?@BCEFGHIJKL
0000050: 4d4e 4f50 5152 5354 5556 5759 5a5c 5e5f  MNOPQRSTUVWYZ\^_
0000060: 6062 6466 6768 696a 6b6c 6d6e 6f70 7172  `bdfghijklmnopqr
0000070: 7374 7576 7778 797a 7b7c 7d7e 7f80 8182  stuvwxyz{|}~....
0000080: 8384 8586 8788 898a 8b8c 8d8e 8f90 9192  ................
0000090: 9394 9596 9798 999a 9b9c 9d9e 9fa0 a1a2  ................
00000a0: a3a4 a5a6 a7a8 a9aa abac adae afb0 b1b2  ................
00000b0: b3b4 b5b6 b7b8 b9ba bbbc bdbe bfc0 c1c2  ................
00000c0: c3c4 c5c6 c7c8 c9ca cbcc cdce cfd0 d1d2  ................
00000d0: d3d4 d5d6 d7d8 d9da dbdc ddde dfe0 e1e2  ................
00000e0: e3e4 e5e6 e7e8 e9ea ebec edee eff0 f1f2  ................
00000f0: f3f4 f5f6 f7f8 f9fa fbfc fdfe ff0a       ..............

Wypróbuj online!

Jak to działa

256,                Push the range [0 ... 255].
    X>              Remove the first item (0).
      10-           Remove 10 (0x0a).
         [D]/       Split at occurrences of 13 (0x0d).
             Aa*    Join, separating by 10 (0x0a).
                :c  Cast all integers to character.
                e#  Begins a comment, terminated by the linefeed at the very end.

Brain-Flak , Riley

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

Wypróbuj online!

Wyjaśnienie

To było trochę łatwiejsze niż się spodziewałem.

Napisałem 3 osobne pętle, aby wydrukować każdy rodzaj aparatu:

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

Użyłem standardowej techniki Mini-Flak, aby uniknąć używania <...>monady i szczerze mówiąc, nigdy tak naprawdę nie czułem potrzeby używania <>niladu.

To musiało być bardzo podobne do tego, co Riley zrobiła przede wszystkim, ponieważ kiedy skończyłem, miałem jeszcze resztkę (). Nie stanowi to problemu, ponieważ w ()zasadzie jest to brak operacji na najwyższym poziomie, więc utknąłem na początku mojego programu.

Haskell, 107 bajtów, Laikoni

main=print$id=<<['|':[d]>>[d|i<-"$$'''',--..:<<<<====>>[[[[]]]]addddddiiiiiimnnprt|||",i==d]|d<-id['$'..]]

Plus końcowy znak nowej linii.

Wypróbuj online! (potrzebuje kilku sekund na uruchomienie, ponieważ przechodzi przez wszystkie znaki Unicode).

Program ma id(tuż przed ['$'..]), który nie jest potrzebny do logiki programu, ale jakoś muszę wydać ii d.

Python, 96 bajtów, Agargara

f= 'B7ofx)wdr0o{1{6{{r){1x0sD00qF1{{24}wr2wlo)y))xm2'; print''.join([r+chr(ord(r)-9)for r in f])

Wypróbuj online!

Kiedy zauważyłem, że niektóre postacie powtarzały się parami, wystarczyło znaleźć odpowiednią mapę ascii między postaciami.

Pyth, 32 bajty, Rod

J+"J+J=JJ 1-2#pTN%"N #%2J=T-1pJJ

Wypróbuj online!

Tak naprawdę nie znam Pytha tak dobrze, ale zacząłem od wydrukowania wymaganego wyjścia i zacząłem stamtąd.

 +"J+J=JJ 1-2#pTN%"N             # Add a '"' to the string in quotes
J                                # Assign result of above step to J
                     #           # Start an infinite loop
                      %2J=T-1    # Loops one iteration, then breaks
                                 # (I have no idea why this works)
                             pJ  # Explicitly print J
                               J # Implicitly print J

CJam, 46 bajtów, Business Cat

93]_:c58]99]95]93]e__:c36]95]95]101]101]e_$_:c

Wypróbuj online!

93]                                             # Push [93] onto the stack
   _                                            # Copy
    :c                                          # Push ascii char 93 ']'
      58 99 95 93                               # Push these numbers...
        ]  ]  ]  ]                              # Push entire stack as array
                  e__                           # Flatten and copy
                     :c                         # Map ascii values to all elements
                       36]95]95]101]101]        # Same as above
                                        e_      # Flatten
                                          $     # Sort
                                           _    # Copy, implicitly print
                                            :c  # Map ascii values to all elements
                                                # Implicitly print

Oktawa, 91 bajtów, drolex

a=['111111111123666667eeegggkkknnszEEGn};:;:'];
disp(['a=[''',a,'''];',10,[a-10,']);']]);dd

Wypróbuj online!

Bardzo podobne do rozwiązania python , ponieważ wykorzystuje wartości ascii do drukowania potrzebnych znaków.