PPCG Jeopardy: Cops


45

คุณรู้จักเว็บไซต์นี้ดีแค่ไหน? มาหาคำตอบกัน

นี่เป็นความท้าทายของ ด้ายของ Robber

ในฐานะตำรวจคุณจะต้อง:

  1. ค้นหาความท้าทายที่ไม่ถูกลบและไม่ปิดบนไซต์นี้เพื่อตอบ ความท้าทายที่ไม่สามารถมีแท็กต่อไปนี้: , , , , , , , คำตอบผูกมัดความท้าทายต้องมีข้อ จำกัด เกี่ยวกับผลลัพธ์ที่ถูกต้อง
  2. เขียนส่งที่ถูกต้องสำหรับความท้าทายในภาษาฟรีที่พบในวิกิพีเดียหรือesolangs.orgหรือtryitonline การส่งไม่จำเป็นต้องแข่งขันเท่านั้นที่ถูกต้อง แก้ไข: ไม่อนุญาตการแฮชในการส่งของคุณ
  3. โพสต์การส่งที่นี่เก็บความลับของความท้าทาย คุณต้องโพสต์ข้อมูลทั้งหมดรวมทั้งภาษา (และเวอร์ชันหากมี)

หลังจากนั้นหนึ่งสัปดาห์ถ้าไม่มีใครได้พบกับความท้าทายที่คุณตอบคุณสามารถโพสต์ความท้าทายว่าการส่งของคุณจะถูกตอบรับที่จุดส่งของคุณปลอดภัย มันมีค่า N คะแนนโดยที่ N คือจำนวน upvotes ของการท้าทาย (ตั้งแต่2016-11-17 ) (สูงกว่าดีกว่า)

ในการถอดรหัสความท้าทายของคุณโจรต้องค้นหาความท้าทายใด ๆที่การส่งนั้นเป็นการส่งที่ถูกต้อง

หมายเหตุ:

  • ถ้าเป็นความท้าทายที่ต้องมีการส่งออกของXและคุณเอาท์พุทXYหรือYXที่Yเป็นสิ่งที่นอกเหนือจากช่องว่างที่ยื่นไม่ถูกต้องสำหรับความท้าทายที่
  • ไม่อนุญาตให้มีการท้าทายที่ใหม่กว่า 2016-11-17
  • อนุญาตให้ใช้ภาษาที่ใหม่กว่าความท้าทายที่ซ่อนอยู่
  • ฉันขอสงวนสิทธิ์ที่จะห้ามการท้าทายบางอย่างหากมีการใช้งานอย่างกว้างขวาง (สามารถนำไปใช้กับส่วนใหญ่ของการส่งทั้งหมด)
  • ขอบคุณDanielสำหรับแนวคิดเริ่มต้น!

ผลงานที่ไม่ได้ติดตาม:

<script>site = 'meta.codegolf'; postID = 5686; isAnswer = false; QUESTION_ID = 100357;</script><script src='https://ajax.googleapis.com/ajax/libs/jquery/2.1.1/jquery.min.js'></script><script>jQuery(function(){var u='https://api.stackexchange.com/2.2/';if(isAnswer)u+='answers/'+postID+'?order=asc&sort=creation&site='+site+'&filter=!GeEyUcJFJeRCD';else u+='questions/'+postID+'?order=asc&sort=creation&site='+site+'&filter=!GeEyUcJFJO6t)';jQuery.get(u,function(b){function d(s){return jQuery('<textarea>').html(s).text()};function r(l){return new RegExp('<pre class="snippet-code-'+l+'\\b[^>]*><code>([\\s\\S]*?)</code></pre>')};b=b.items[0].body;var j=r('js').exec(b),c=r('css').exec(b),h=r('html').exec(b);if(c!==null)jQuery('head').append(jQuery('<style>').text(d(c[1])));if (h!==null)jQuery('body').append(d(h[1]));if(j!==null)jQuery('body').append(jQuery('<script>').text(d(j[1])))})})</script>



1
ไม่จำเป็นต้องนับจำนวนไบต์
Nathan Merrill

1
มีความท้าทายมากมายที่การแก้ปัญหาจะใช้เวลานานกว่าหนึ่งชั่วโมงในการคำนวณหาอินพุตที่ถูกต้อง การ จำกัด เวลาไม่ใช่ความคิดที่ดี
Mego

2
@NathanMerrill การใช้ถ้อยคำปัจจุบันแสดงให้เห็นว่าหากมีการป้อนข้อมูลที่จะใช้เวลาหนึ่งชั่วโมงในการคำนวณผลลัพธ์สำหรับคำตอบนั้นจะไม่ถูกต้อง นี่หมายความว่าโดยทั่วไปแล้วความท้าทายที่ไม่สำคัญ
ปาเก็ตตี้

4
@NathanMerrill ไม่ใช่ feersum ที่นี่ แต่อย่างที่ฉันได้แสดงความคิดเห็นเกี่ยวกับการส่งของ Mego ไม่มีการรับประกันว่าคุณจะไม่โดนแฮชอีกครั้งก่อนที่จะถูกกำหนด ฉันเชื่อว่าตำรวจควรจะต้องแน่ใจว่าโปรแกรมของพวกเขาเป็นคนแรกที่ตรงกับในกรณีนี้หากตำรวจสามารถตรวจสอบได้แล้วโจรก็สามารถทำได้
Sp3000

คำตอบ:


11

Pip , 9 ไบต์ ( ปลอดภัย , 15 คะแนน)

(q`\w+`1)

อะไรที่มันไม่ควรจะเป็นเรื่องง่ายที่จะคิดออก แต่คำถามคือทำไม ... ( TIO )


ความท้าทายคือภาษาอะไร เป้าหมาย: แยกชื่อภาษาการเขียนโปรแกรมออกจากส่วนหัวคำตอบ PPCG ตัวอย่างเช่น

Input: <h1>JavaScript, 13 chars / 32 bytes</h1>
Desired Output: JavaScript

ฉันไม่แน่ใจว่าสิ่งนี้จะตกอยู่ใน "ความท้าทายต้องมีข้อ จำกัด ในการส่งออกที่ถูกต้อง" เนื่องจากเป็นความท้าทายในโดยใช้ "เปอร์เซ็นต์ของการทดสอบที่คุณได้รับที่ถูกต้อง" และไม่ต้องการผลลัพธ์ที่ถูกต้อง สำหรับอินพุตทั้งหมด อย่างไรก็ตามฉันจะบอกว่ารหัสข้างต้นได้รับอัตราที่ถูกต้องประมาณ 60% ซึ่งไม่เลวสำหรับบางสิ่งที่ง่ายมาก


ดูเหมือนว่าจะเป็นการแยกสตริงในคอมมาและส่งคืนสตริงที่ 2 ในการแยกผลลัพธ์ O_O ฉันไม่รู้ pip แต่นั่นคือทั้งหมดที่ฉันได้รับ
Yodle

2
@Yodle แยกมันเป็นคำ regex ไม่ใช่แค่เครื่องหมายจุลภาค
Maltysen

แปลเป็น pyth ฉันเชื่อว่านี่เป็นสิ่งที่ต้องการht:w"\w+"1/ @:w"\w+"1 1ซึ่งย่อให้เล็กลงhtcw/ htczหากเฉพาะพื้นที่ว่างเท่านั้น แต่ไม่มีผลลัพธ์ใด ๆ นอกจากนี้ยังสามารถดึงนาทีจากรูปแบบ HH: mm: ss หรือแยกชื่อตัวแปรจากการประกาศสไตล์ C หรือตัวเลขหลังจุดทศนิยม แต่ฉันไม่พบคำถามที่ถามสิ่งเหล่านั้น ... : /
เดฟ

3

Perl - ถอดรหัสโดยDLosc

ให้คนง่าย ๆ สำหรับคนที่ไม่ใช่ชาว esolang

ทำงานด้วย -nl

say $_ ~~ reverse y-"({[]})"-")}][{("-r;;r-")}][{("-"({[]})"-y esrever ~~ _$ yas

ถาม : สะดวก Palindrome ตรวจสอบ

รหัสเกิดปัญหาหลังจากการพิมพ์ truthiness แต่ตามนี้โพสต์เมตาตราบใดที่มันผลิตการส่งออกที่ถูกต้องก่อนที่จะเกิดปัญหาและข้อผิดพลาดใด ๆ ออกไป STDERR มันเป็นวิธีการแก้ปัญหาที่ถูกต้อง


5
ราวกับว่า Perl อ่านง่ายกว่า esolang: P
ETHproductions

1
ใช่ฉันไม่รู้จัก esolangs ใด ๆ แต่ฉันก็ไม่รู้ Perl :(
Yodle


Dangit ฉันจะโพสต์สิ่งที่แน่นอนจนกว่าโพสต์จะถูกลบไปก่อนหน้านี้ (ฉันไม่สามารถหาวิธีที่จะให้มันทำงานบน ideone ได้)
ETHproductions

สำหรับรายการในอนาคตฉันจะส่งลิงค์ ideone พร้อมคำอธิบายวิธีเรียกใช้
Gabriel Benamy

3

Hexagony , 548 ไบต์, แคร็ก

69;{108;\_1$;;;/0;108\56;19|1^\6/15\;72_$23371<};;!;6;33|;;015><;;7;@3?;43+1586;2_3219><11;;'_8;;;2_|3;81|2<|8517;327}1_23;1;4$%;_4{5.1;1332_3;029&;'_};;1..527;2'..35;5212_>97;$;2/0;-;3_2;/233;08.._\901;0/13'}92...>/>/57\53;633;4'22;/|~>;441;45;;$161;371;3/;3.7026;`208;1<}>27;140;217;11.0;/2;692;<01/2;301;18;31/;10;/3;44<1914/111;{98;38;;;13/4;<;3;1;;/;112;<.$13032;..27;1;222/1;0<6..1;0;'..933721389/9<6;.;3;37..;;875;*;;0[1;287]59..902;;2;12;1;59;;3#..4;;1=249$345249;...;012}021#>/;44>114/4201;;;3>0;>;24;3/;;116._4>337;237/$5_>1{32;102;255;'_

ลองออนไลน์!


ความท้าทายนี้อาจไม่ใช่สิ่งที่คุณตั้งใจเพราะผลลัพธ์ที่นี่เปลี่ยนแปลงขึ้นอยู่กับจำนวนอินพุต แต่หากไม่มีการป้อนข้อมูลจะพิมพ์สตริงในการท้าทายนั้นและ "โจรต้องค้นหาความท้าทายใด ๆที่การส่งนั้นเป็นการส่งที่ถูกต้อง" งั้นเหรอ?
Luis Mendo

@ LuisMendo มันไม่ได้พิมพ์สตริงที่ค่อนข้าง
Martin Ender

(เพียงเพื่อจะชัดเจนคำตอบของฉันไม่ได้พิมพ์ต่อท้าย.ที่จำเป็นโดยความท้าทายที่.)
มาร์ตินเอนเดอร์

ใช่ฉันเห็น :-) ความรู้เกี่ยวกับ Hexagony ของฉันไม่อนุญาตให้ฉันก้าวหน้ามาก ...
Luis Mendo


3

Perl ปลอดภัย 18 คะแนน

แก้ไข : ฉันแก้ไขจุดสิ้นสุดของรหัส (ดูประวัติการแก้ไข) เพื่อจัดการกับตัวพิมพ์ขอบ (ความท้าทายไม่ได้พูดอะไรเกี่ยวกับมันและผู้เขียนไม่ได้ตอบเมื่อถามถึงมัน แต่อย่างน้อยรหัสนี้จัดการมัน) . แต่อัลกอริทึมและตรรกะของรหัสยังคงเหมือนเดิม

perl -n0E '/.*/;s/(^0|A)(.{@{+}})?0/A$2A/s||s/0(.{@{+}})?A/A$1A/s?redo:say/A$/+0'

รหัสนี้ไม่ทำให้สับสน (เพิ่งเล่นกอล์ฟ) (นี่แสดงว่าไม่ได้-n0Eเป็นตัวเลือก)

ฉันไม่ทราบว่ามันยากหรือไม่ แต่ฉันคิดว่าฉันจะได้รับการแก้ไขเมื่อมีคนแตก


คำอธิบาย:

ความท้าทายคือเขาวงกตสามารถแก้ไขได้? .

รหัสนี้จะพบทุกเซลล์ที่สามารถเข้าถึงได้ของเขาวงกต (และทำเครื่องหมายด้วยA): หากเซลล์สัมผัสกับเซลล์ที่มีเครื่องหมายเซลล์Aจะสามารถเข้าถึงได้และเราจะทำเครื่องหมายด้วยAเช่นกัน และเราทำเช่นนั้นอีกครั้ง ( redo) ทำโดยใช้ regex สองตัว: s/(^0|A)(.{@{+}})?0/A$2A/sตรวจสอบว่าช่องว่างอยู่ด้านขวาหรือด้านล่างของ a Aในขณะที่s/0(.{@{+}})?A/A$1A/sตรวจสอบว่ามีช่องว่างทางด้านซ้ายหรือด้านบนของ a Aหรือไม่ ในตอนท้ายถ้าเซลล์สุดท้ายมีเซลล์ที่Aเข้าถึงได้มิฉะนั้นจะไม่ (นั่นคือสิ่งที่say/A$/+0ตรวจสอบ+0อยู่ที่นี่เพื่อให้แน่ใจว่าผลลัพธ์จะเป็น0หรือ1แทนที่จะเป็นสตริงว่างเปล่าและ1)
โปรดทราบว่า/.*/จะตรงกับทั้งบรรทัดดังนั้นการตั้งค่า@+ไปยังดัชนีของจุดสิ้นสุดของบรรทัดแรกซึ่งเกิดขึ้นเป็นขนาดของบรรทัดซึ่งอนุญาตให้ใช้เพื่อใช้.{@{+}}จับคู่อักขระให้ได้มากเท่ากับที่มีในบรรทัด ( @{+}เทียบเท่า@+แต่สามารถใช้ในอดีตเท่านั้นใน regex)

วิธีเรียกใช้:

$ perl -n0E '/.*/;s/(^0|A)(.{@{+}})?0/A$2A/s||s/0(.{@{+}})?A/A$1A/s?redo:say 1-/0$/' <<< "0000001
0000010
1111011
0000000"
1

(และหากคุณแทนที่1111011บรรทัดด้วย1111111จะไม่สามารถแก้ไขได้อีกต่อไปและเอาต์พุตจะ0แทน1)


3

Perl, 56 ไบต์, ปลอดภัย (14 คะแนน)

undef$/;print+(<>^<>)=~y/\x81-\xff\x00-\x80/\x01-\xff/dr

ความท้าทายคือสิ่งนี้ต้องการให้คุณสร้างอัลกอริทึมที่แตกต่าง คุณต้องสามารถใส่ไฟล์สองไฟล์และส่งออกไฟล์ดิฟหรือใส่ไฟล์และไฟล์ต่าง ๆ การให้คะแนนความท้าทายนั้นเป็นความท้าทายของทำให้ผู้ชนะที่เล็กที่สุดต่างกัน แต่นี้ความท้าทายที่ไม่จำเป็นต้องมีคำตอบที่จะมีการแข่งขันเพียงสอดคล้องกับข้อมูลจำเพาะดังนั้นผมเขียนโปรแกรม diffing ในทางที่แข็งแรงเล่นกอล์ฟแทนซึ่งก็ใช้แฮคเกอร์ที่จะรวมปัจจัยการผลิต (หมายความว่าโปรแกรมเดียวกันทำงานสำหรับ diffing และ ยกเลิก diffing)

ส่วนที่ยากที่สุดคือการทำซ้ำความยาวของไฟล์ต้นฉบับ อินพุตถูกระบุเป็น ASCII ซึ่งเป็นชุดอักขระเจ็ดบิตดังนั้นฉันจึงใช้บิตที่แปดเพื่อติดตามความยาวของไฟล์ เมื่อกระจายเราตั้งค่าบิตสูงของทุกไบต์โดยใช้y///คำสั่ง เมื่อไม่กระจาย (รับรู้ผ่านการสังเกตว่าอินพุตมีชุดบิตสูงแล้ว) เราจะลบ NULs ออกจากเอาต์พุต (ฉันเพิ่งรู้ว่าสิ่งนี้จะล้มเหลวหากอินพุตมี NUL ไบต์ แต่ความท้าทายถูกกำหนดในรูปแบบของแบตเตอรี่ทดสอบและโชคดีที่ฉันไม่คิดว่ามี NUL ไบต์ในแบตเตอรี่ถ้ามี โปรแกรมนี้จะไม่ถูกต้องและจะต้องถูกตัดสิทธิ์ปัญหาของ คือไม่มีใครมีข้อมูลเพียงพอที่จะชี้ให้เห็นข้อบกพร่องที่แก้ไขได้ง่ายในคำตอบของคุณ!)


ปลอดภัย methinks
msh210

3

อ็อกเทฟ 15 คะแนน! SAFE

@(x,y)find((v=((z=cumsum(x.^2))(y:end)-[0,z(1:end-y)]))==max(v),1)-1

ลองออนไลน์ได้ที่นี่


คำอธิบาย:

รหัสที่ใช้สตริงการป้อนข้อมูลxที่มีคนและศูนย์, และจำนวนเต็ม10010110110101y

ในการหาค่าเฉลี่ยเคลื่อนที่ของลำดับใน MATLAB / Octave คุณสามารถทำได้:

z = cumsum(x);
movmean = z(y:end) - [0 z(1:end-y)];

เนื่องจากเราสนใจเฉพาะตำแหน่งสูงสุดไม่ใช่ค่าจริงเราจึงไม่จำเป็นต้องสนใจการแปลงสตริงเป็นตัวเลข (x.^2)สี่เหลี่ยมทั้งหมด ASCII ค่าสำหรับ48,49 0,1นี่เป็นสิ่งจำเป็นเนื่องจาก Octave ไม่สามารถใช้cumsumกับอักขระได้โดยตรง cumsum(+x)จะสั้นลงสองไบต์ แต่จะเปิดเผยว่าxเป็นสตริง

นี่เป็นสนามที่ค่อนข้างดี (ยกเว้นสำหรับ.^2แทนที่+) แน่นอนการโน้มน้าวใจจะง่ายขึ้น


2

MATL Cracked

&:"@FYAYm7>vs

ลองออนไลน์!

ฉันระบุอินพุตและเอาต์พุตแม้ว่าไม่จำเป็น เนื่องจากอยู่ในประวัติการแก้ไขต่อไป: โปรแกรมป้อนสองตัวเลขและส่งออกหนึ่งหมายเลข



@ETHproductions โอ้ว่าไม่คุณจะพบกับความท้าทายที่? ฉันเลือกมันแบบสุ่ม -)
Luis Mendo

2

C #, 590 ไบต์แตกแล้ว

(I,N)=>{string R="",p="`1234567890-=",P="~!@#$%^&*()_+",q="qwertyuiop[]\\",Q="QWERTYUIOP{}|",a="asdfghjkl;\'",A="ASDFGHJKL:\"",z="zxcvbnm,./",Z="ZXCVBNM<>?";foreach(var c in I){var f=c+"";if(p.Contains(f))R+=p[(p.IndexOf(c)+N)%13];else if(P.Contains(f))R+=P[(P.IndexOf(c)+N)%13];else if(q.Contains(f))R+=q[(q.IndexOf(c)+N)%13];else if(Q.Contains(f))R+=Q[(Q.IndexOf(c)+N)%13];else if(a.Contains(f))R+=a[(a.IndexOf(c)+N)%11];else if(A.Contains(f))R+=A[(A.IndexOf(c)+N)%11];else if(z.Contains(f))R+=z[(z.IndexOf(c)+N)%10];else if(Z.Contains(f))R+=Z[(Z.IndexOf(c)+N)%10];else R+=c;}return R;};

อาจเป็นโปรแกรมที่ค่อนข้างง่ายและเป็นโปรแกรมที่ค่อนข้างยาว


Func<string, int, string>แลมบ์ดาเป็น ดูเหมือนว่ามันเป็นแป้นตัวเลข พารามิเตอร์คือจำนวนตัวอักษรที่จะเลื่อนไปทางขวาบนแป้นพิมพ์ (ie- ("t",1)= y)
นม


ดีไม่ได้คาดหวังว่าจะนานเกินไป: P
Yodle

2

05AB1E , 27 ไบต์, แคร็ก!

สำหรับการส่งนี้จำเป็นต้องป้อนข้อมูลเพื่อให้สามารถใช้งานได้ ไม่ควรยากที่จะร้าว

ávyl•B;£¡´•54B•2ît•‡y.li(}O

คำอธิบาย (สำหรับการท้าทาย):

á                             # Keep all the letters of the input string
 vy                           # For each letter...
   l                          #   Convert to lowercase
    •B;£¡´•54B                #   String that turns into 'pnbrqk'
              •2ît•           #   Compressed int: 133591
                   ‡          #   Transliterates the following:
                                    p -> 1
                                    n -> 3
                                    b -> 3
                                    r -> 5
                                    q -> 9
                                    k -> 1
                    y.li }    #   If the current letter is lowercase...
                        (     #     Negate that number
                          O   # Sum up the result

ใช้การเข้ารหัสCP-1252 ลองออนไลน์!


คุณโพสต์ไปที่ pastebin?: pastebin.com/QyvpUb9b
tuskiomi

@tuskiomi อืมไม่นี่ไม่ใช่ฉัน
Adnan

มันแปลกมาก ฉัน googled ผลลัพธ์ของคุณ (คุณต้องแน่ใจ) และนั่นคือ 1 ใน 3 ของผลลัพธ์ ฉันสงสัยว่ามีบอทที่ดึงคำตอบ ?? hmm ..
tuskiomi

พิมพ์อินพุตที่สอง
Oliver Ni



2

Python ขนาด 935 ไบต์

def oo000 ( num ) :
 return - ~ num
def ii ( num ) :
 return - ( oo000 ( oo000 ( ~ num ) ) )
def oOOo ( num1 , num2 ) :
 while num2 > 0 :
  num1 = oo000 ( num1 )
  num2 = ii ( num2 )
 return num1
 if 59 - 59: Oo0Ooo . OO0OO0O0O0 * iiiIIii1IIi . iII111iiiii11 % I1IiiI
def IIi1IiiiI1Ii ( num1 , num2 ) :
 I11i11Ii = num2
 oO00oOo = 0
 while I11i11Ii > 0 :
  oO00oOo = oOOo ( oO00oOo , num1 )
  I11i11Ii = ii ( I11i11Ii )
  if 92 - 92: O0O / oo000i1iIi11iIIi1 % Iii1IIIiiI + iI - Oo / o0O
 return oO00oOo
def hgj ( num1 , num2 ) :
 I11i11Ii = num2
 oO00oOo = 1
 while I11i11Ii > 0 :
  oO00oOo = IIi1IiiiI1Ii ( oO00oOo , num1 )
  I11i11Ii = ii ( I11i11Ii )
  if 48 - 48: iII111i % IiII + I1Ii111 / ooOoO0o * o00O0oo
 return oO00oOo
def O0oOO0o0 ( num1 , num2 ) :
 return oOOo ( num1 , - num2 )
 if 9 - 9: o0o - OOO0o0o
 if 40 - 40: II / oo00 * Iii1IIIiiI * o0o . ooOoO0o
print(hgj ( 9 , 9999 ))
# dd678faae9ac167bc83abf78e5cb2f3f0688d3a3

ขอโทษด้วยฉันใช้ obfuscator แต่ก็ไม่ได้รับอนุญาตและวิธีง่ายกว่า (และฉันไม่มีเวลาทำมันด้วยตัวเอง ... )


ตอนนี้ฉันไม่เข้าใจรหัสนั้นด้วยตัวเอง ...
Mega Man

1
ง่าย deobfuscate แต่คำถามที่มันอาจจะพอดีกับทุกคนดูเหมือนจะติดแท็กยุ่งบีเวอร์ ...
Peter Taylor

Nice obfuscation!
OldBunny2800

การคำนวณนี้9**99โดยไม่ต้องพิมพ์สิ่งใด (ใช้เวลานานในการทำเช่นนั้น)
บลู

@PeterTaylor ไม่ใช่คำถามที่ยุ่งมากฉันแค่ใช้วิธีแปลก ๆ ในการแก้ปัญหา
Mega Man


2

MATL ปลอดภัย 93 คะแนน

dP7EGn:q^1J2/h)ts_hX=Gs[BE]Wd=~>~GBz*

ลองออนไลน์!


คำอธิบาย

ความท้าทายคือรหัสที่มารอยเท้าทางนิเวศน์

รหัสคำนวณน้ำหนัก Hamming (จำนวนตัว) ในรูปแบบเลขฐานสองของรหัส ASCII ของสตริงอินพุต ยกเว้นว่าสตริงจะtestส่งออก0(แทนน้ำหนัก Hamming ซึ่งก็คือ17)

ปลอกพิเศษของสตริงนั้นดูสับสนเล็กน้อย โปรแกรมจะคำนวณอาร์เรย์ของความแตกต่างติดต่อกันของรหัส ASCII ของอินพุตและกลับด้าน สำหรับการนี้จะช่วยให้test[1 14 -15]

จากนั้นอาร์เรย์ที่เกิดขึ้นจากnพลังแรกของการ14คำนวณ ( [1 14 196 ...]) ซึ่งnเป็นความยาวอินพุต; และfloor(n/2)เก็บค่าแรกไว้ ดังนั้นสำหรับการป้อนข้อมูลนี้จะช่วยให้test [1 14]ผลรวมเมื่อตะกี้ถูกผนวกเข้ากับอาร์เรย์นี้ซึ่งจะช่วยให้สำหรับการป้อนข้อมูล[1 14 -15] testนี่คือการทดสอบเพื่อความเท่าเทียมกันกับอาร์เรย์ที่กลับรายการของความแตกต่างติดต่อกันซึ่งได้รับมาก่อนหน้านี้

ในทางกลับกันผลรวมของรหัส ASCII ของตัวอักษรอินพุตจะถูกคำนวณและเปรียบเทียบกับ448สร้างขึ้นเป็นความแตกต่าง (ต่อเนื่อง) ขององค์ประกอบในอาร์เรย์[2^6 2^9](ซึ่ง^หมายถึงพลังงาน)

การป้อนข้อมูลที่testเป็นสตริงเท่านั้นที่มีความแตกต่างตรงกันข้ามติดต่อกันของรูปแบบและผลรวม[1 14 -15] 448ความแตกต่าง[]หรือ[1](สำหรับสตริง inoyt สั้น) 448จะไม่เข้ากันได้กับผลรวมของ ความแตกต่าง[1 14 196]หรือใหญ่กว่าไม่สามารถทำได้ด้วยอักขระ ASCII

รหัสจะตรวจสอบว่าผลลัพธ์ของการทดสอบสำหรับเงื่อนไขแรก (ความแตกต่างติดต่อกัน) ไม่น้อยกว่าผลลัพธ์ที่ถูกปฏิเสธของเงื่อนไขที่สอง (ผลรวมทั้งหมด) สิ่งนี้จะช่วยให้0หากว่าทั้งสองเงื่อนไขมีความพึงพอใจ ในที่สุดนี้จะถูกคูณด้วยจำนวนของคนในการเป็นตัวแทนไบนารีของรหัส ASCII ของการป้อนข้อมูล


โปรดลองออนไลน์
tuskiomi

@tuskiomi เรียบร้อยแล้ว แต่เนื่องจากคุณต้องคาดเดารูปแบบการป้อนข้อมูลก็ไม่ได้ใช้มาก ...
หลุยส์ Mendo

ตัวเลขดูเหมือนจะทำงานได้ดี
tuskiomi


2
นี่อาจจะเป็นผู้ชนะ ... :)
Stewie Griffin


2

Python 3 ~ 2000 ไบต์(ปลอดภัย: 23 คะแนน)


โปรแกรมดั้งเดิม

exec("\n))o0000o000o<)]))]00000o000o[0o0o0o0o0o0o0o0o0o(00000000000000o0o(000000000000000o0o ni oooo0oooo rof)))0o0o0o0o0o0o0o0o0o(00000000000000o0o(000000000000000o0o ni 00oo00oo00oo00oo00oo rof]oooo0oooo[]00oo00oo00oo00oo00oo[0o0o0o0o0o0o0o0o0o(000ooo000ooo000o[ +]0o0o0o0o0o0o0o0o0o ni 00oo00oo00oo00oo00oo rof)00oo00oo00oo00oo00oo(000ooo000ooo000o[ni ooo000ooo000o rof)ooo000ooo000o(o0o0o0o0o-o0000o000o(000ooo000ooo000o(00o00o00o(tnirp\n)00000o000o,00000o000o(tresni.o0o0o0o0o0o0o0o0o0o:))00000000000000o0o=yek,0o0o0o0o0o0o0o0o0o(xam(00000000000000o0o<)o0o0o0o0o0o0o0o0o0o(00000000000000o0o elihw \n:)]00000o000o[]o0oooo,0o0o0o0o0o0o0o0o0o[( ni o0o0o0o0o0o0o0o0o0o rof\n;'=01NgwiNgwSNbBibpBybw8GMwAzbw8GM'b,]0o0o0o0o00oo ni ooooo0o00oo rof]]::0oooooo0oooo[))ooooo0o00oo(0oooooo(o0oooo ni ooo000ooo000o rof)ooo000ooo000o(00o00o00o[[=ooooo00oo,0o0o0o0o0o0o0o0o0o\n)'=kSZsBXd0BCLn5WayR3cgwCdulGK'b(0o0o.)(0o0ooo0o00ooo.o000oo esle o0000o000o fi o0000o000o+o0000o000o=0oooooo0oooo;)000000000000000o0o(o00oo00o=000000000000000o0o;)))(edoced.)o0o(0oo000o(000000o(o000oo,))(]o0000o000o[]edoced.)'==QbhRHa'b(0oo000o,'oo0o0o00o'[(oo0o0oo=o0o0o0o0o,oo0o0o0oo\n;)00000000000000o0o(o00oo00o,))(edoced.)'vJHZ'b(0oo000o(o00oo00o,)'bin'(o00oo00o=00000000000000o0o,0oooooo,o0oooo;))0000o0o0o(000000o(o000oo:0000o0o0o adbmal = o00oo00o ;)))(0o0oo00o(0oooooo(0o0oo0oo=0o0o0o0o00oo\n00000000000001**o0000o000o=o0000o000o;))(edoced.)'=cSbhRHanwCd1BnbpxyXfRncvBXbp91Xs4WavpmLnAyJ'b(0oo000o(o000oo=o0oo0oo00o,0o0oo00o,o0oo0oo,0o0oo0oo;edoced46b.)000oo0o(oo0o0oo=0oo000o\n;'==QYsxGKb92bwADMvVCN8EDIm9mcg8GMvBSauBybw82bwADMvBzbdliKq4SN'b ,))0o0oo00oo(000000o(__tropmi__ :0o0oo00oo adbmal,'base64',]0o0oo00oo[:0o0oo00oo adbmal = oo00oo00oo00oo00oo00oo,oo0o0oo,000oo0o,0oooooo\n;tni,'range','len','==Abh1mYkFGIv9GMwAzb682bwADMvBSYuRGIv9GMvBzbw82buYWYjR3bylWYshybvBDMw8WLxkiKqITJv9GMwAzb'b,lave,0**0000000000000009,0 ,]1-::[0o0ooo0o00o0oo:0o0ooo0o00o0oo adbmal,mus = 00o00o00o,000000000000000o0o,00000000000000o0o,o0o,o000oo,o0000o000o,00000o000o,000000o,000ooo000ooo000o\n"[::-1])

ท้าทาย

นี่คือในความเป็นจริงคำตอบสำหรับความท้าทายของตัวเองเป็นPrimenary Strings ฉันเลือกสิ่งนี้เพราะเกือบทุกอย่างจะได้ผลลัพธ์0นอกเหนือจากอินพุตเพียงเล็กน้อยที่โจรจะไม่ป้อน รหัสเป็นอัลกอริทึมง่าย ๆ แต่ obfuscated อย่างมาก (ด้วยมือ)



1

JavaScript, 533 ไบต์, แคร็ก! โดย Dave

_=this;[490837,358155,390922].map(y=function(M,i){return _[[
U=[y+[]][+[]]][+[]][i]]=_[M.toString(2<<2<<2)]});function g(
s){return Function("a","b","c","return "+s)};e=g(u(["","GQ9\
ZygiYTwyPzE6YSpk","C0tYSki","SkoYSkvZChhLWIpL2QoYikg"].join(
"K")));h=g("A=a,B=b,g('A(a,B(a))')");j=g("a/b");L=g("Z=a,Y=\
b,g('Z(a,Y)')");k=L(j,T=2);F=g(u("KScpKWIsYShFLCliLGEoQyhEJ\
yhnLGM9RSxiPUQsYT1D").split("").reverse().join(""));RESULT=F
(h(e,k),j,g("_[U[10]+[![]+[]][+[]][++[+[]][+[]]]+[!+[]+[]][\
+[]][+[]]+17..toString(2<<2<<2)].pow(T,a)"));

ไม่ใช่ความสับสนของฉันที่ชื่นชอบ แต่มันค่อนข้างเรียบร้อย โทรRESULT(inputs)มา

ฉันอาจให้รางวัลค่าหัว +50 ถ้าคุณอธิบายโดยละเอียดว่าโค้ดของฉันทำอะไรพร้อมกับรอยแตกของคุณ (พวกเขาไม่จำเป็นต้องอยู่ด้วยกันดังนั้นอย่าลังเลที่จะ FGITW หากสิ่งนั้นเหมาะสมกับการเรียนของคุณ)



1

Pyke, 3458 ไบต์, ปลอดภัย , คะแนน 99

wB"["R";7m"ddddddddddddddddddddddddddwE"["R";7m"ddddddddddddddddddddddddddw?"["R";7m"ddddddddddddddddddddddddddnwB"["R";7m"ddddddddddddddddddddddddddwE"["R";7m"ddddddddddddddddddddddddddw?"["R";7m"ddddddddddddddddddddddddddnwB"["R";7m"ddddddddddddddddddddddddddwE"["R";7m"ddddddddddddddddddddddddddw?"["R";7m"ddddddddddddddddddddddddddnwB"["R";7m"ddddddddddddddddddddddddddwE"["R";7m"ddddddddddddddddddddddddddw?"["R";7m"ddddddddddddddddddddddddddnwB"["R";7m"ddddddddddddddddddddddddddwE"["R";7m"ddddddddddddddddddddddddddw?"["R";7m"ddddddddddddddddddddddddddnwB"["R";7m"ddddddddddddddddddddddddddwE"["R";7m"ddddddddddddddddddddddddddw?"["R";7m"ddddddddddddddddddddddddddnwB"["R";7m"ddddddddddddddddddddddddddwE"["R";7m"ddddddddddddddddddddddddddw?"["R";7m"ddddddddddddddddddddddddddnwB"["R";7m"ddddddddddddddddddddddddddwE"["R";7m"ddddddddddddddddddddddddddw?"["R";7m"ddddddddddddddddddddddddddnwB"["R";7m"ddddddddddddddddddddddddddwE"["R";7m"ddddddddddddddddddddddddddw?"["R";7m"ddddddddddddddddddddddddddnwB"["R";7m"ddddddddddddddddddddddddddwE"["R";7m"ddddddddddddddddddddddddddw?"["R";7m"ddddddddddddddddddddddddddnwB"["R";7m"ddddddddddddddddddddddddddwE"["R";7m"ddddddddddddddddddddddddddw?"["R";7m"ddddddddddddddddddddddddddnwB"["R";7m"ddddddddddddddddddddddddddwE"["R";7m"ddddddddddddddddddddddddddw?"["R";7m"ddddddddddddddddddddddddddnwB"["R";7m"ddddddddddddddddddddddddddwE"["R";7m"ddddddddddddddddddddddddddw?"["R";7m"ddddddddddddddddddddddddddnwB"["R";7m"ddddddddddddddddddddddddddwE"["R";7m"ddddddddddddddddddddddddddw?"["R";7m"ddddddddddddddddddddddddddnwB"["R";7m"ddddddddddddddddddddddddddwE"["R";7m"ddddddddddddddddddddddddddw?"["R";7m"ddddddddddddddddddddddddddnwB"["R";7m"ddddddddddddddddddddddddddwE"["R";7m"ddddddddddddddddddddddddddw?"["R";7m"ddddddddddddddddddddddddddnwB"["R";7m"ddddddddddddddddddddddddddwE"["R";7m"ddddddddddddddddddddddddddw?"["R";7m"ddddddddddddddddddddddddddnwB"["R";7m"ddddddddddddddddddddddddddwE"["R";7m"ddddddddddddddddddddddddddw?"["R";7m"ddddddddddddddddddddddddddnwB"["R";7m"ddddddddddddddddddddddddddwE"["R";7m"ddddddddddddddddddddddddddw?"["R";7m"ddddddddddddddddddddddddddnwB"["R";7m"ddddddddddddddddddddddddddwE"["R";7m"ddddddddddddddddddddddddddw?"["R";7m"ddddddddddddddddddddddddddnwB"["R";7m"ddddddddddddddddddddddddddwE"["R";7m"ddddddddddddddddddddddddddw?"["R";7m"ddddddddddddddddddddddddddnwB"["R";7m"ddddddddddddddddddddddddddwE"["R";7m"ddddddddddddddddddddddddddw?"["R";7m"ddddddddddddddddddddddddddnwB"["R";7m"ddddddddddddddddddddddddddwE"["R";7m"ddddddddddddddddddddddddddw?"["R";7m"ddddddddddddddddddddddddddnwB"["R";7m"ddddddddddddddddddddddddddwE"["R";7m"ddddddddddddddddddddddddddw?"["R";7m"ddddddddddddddddddddddddddnwB"["R";7m"ddddddddddddddddddddddddddwE"["R";7m"ddddddddddddddddddddddddddw?"["R";7m"ddddddddddddddddddddddddddnwB"["R";7m"ddddddddddddddddddddddddddwE"["R";7m"ddddddddddddddddddddddddddw?"["R";7m"ddddddddddddddddddddddddddnwB"["R";7m"ddddddddddddddddddddddddddwE"["R";7m"ddddddddddddddddddddddddddw?"["R";7m"ddddddddddddddddddddddddddnwB"["R";7m"ddddddddddddddddddddddddddwE"["R";7m"ddddddddddddddddddddddddddw?"["R";7m"ddddddddddddddddddddddddddnwB"["R";7m"ddddddddddddddddddddddddddwE"["R";7m"ddddddddddddddddddddddddddw?"["R";7m"ddddddddddddddddddddddddddnwB"["R";7m"ddddddddddddddddddddddddddwE"["R";7m"ddddddddddddddddddddddddddw?"["R";7m"ddddddddddddddddddddddddddsQI30>Q%)

ลองที่นี่!

มีกี่0x1bไบต์(30) ที่ดูเหมือนว่า SE จะถูกกินแล้ว


คุณสามารถทำเครื่องหมายว่าปลอดภัยแล้วในตอนนี้
FlipTack

1

อ็อกเทฟ40 คะแนน SAFE

คำตอบที่สับสนเล็กน้อยกับความท้าทายที่ได้รับความนิยม

y=find((x=mod(input('')*2,32))>12);sign(sum(x.*[1-y:nnz(x+8)-y]))

ผมขอแนะนำให้ทดสอบนี้ในคู่ออนไลน์ Ideone นั้นไม่ค่อยดีเมื่อพูดถึง STDIN


นี่คือความท้าทายของตัวจำลองคันโยกปี 2015 '123^32ป้อนข้อมูลในแบบฟอร์ม ผลลัพธ์จะเป็นแบบ-1 0 1ซ้ายหนักสมดุลและขวาหนักตามลำดับ

ดูเหมือนว่านี้เมื่อเล่นกอล์ฟเต็มแล้ว :

s=mod(input(''),16);i=find(s>9);s*[1-i:numel(s)-i]'*inf

เอาต์พุตนี้-Inf, NaN, Infสำหรับ L, B, R ตามลำดับ


1
ทำไม Oliver ถึงแก้ไขจำนวนไบต์? นี่ไม่ใช่ codegolf และคำตอบไม่จำเป็นต้องแข่งขันกับความท้าทาย แต่ใช้ได้
FlipTack

1

Haskell, SAFE

m f=map(f<$>)
g=reverse.("":)
f s|(f:c:s)<-m fromEnum.g.words$s,
    (f:c:s)<-init.unwords.g.m(\s->toEnum$if c!!0==s||s==sum(-32:c)then(last$f)else s)$s=init$s

ลองบน Ideone "การใช้งาน":

Prelude> f "Programming Puzzles & Code Golf"
"rogramming Puzzles "

ในการท้าทาย String Shenanigans สิ่งหนึ่งจะได้รับสายอักขระและสองตัวอักษรและจากนั้นควรแทนที่อักขระที่เกิดขึ้นครั้งแรกด้วยอักขระที่สอง อย่างไรก็ตามอินพุตเป็นหนึ่งสตริงเท่านั้นที่มีสตริงจริงในเครื่องหมายคำพูดและตัวละครสองตัวแยกช่องว่าง:

Prelude> f "\"Hello, World!\" l r"
"Herro, Worrd!"

1

TeX, 240 ไบต์, ปลอดภัย , คะแนน 129

\let\N\newcount\let\I\ifnum\let\A\advance\let\E\else\N\a\N\b\N\c\def\D#1:#2:#3:{\I#1>#2\A#1by-#2\D#1:#2:#3:\E\I#1=#2 #3=1\E#3=0\fi\fi}\def\P#1:#2:{\I#1>#2\a=#1\D\a:#2:\c:\I\c=0\b=#2\A\b by1\P#1:\the\b:\E N\fi\E\I#1=1 N\E Y\fi\fi}\P1:2:\end

บันทึกเป็นjeopardy.texเรียกใช้แล้วและเปิดกว้างpdftex jeopardy.texjeopardy.pdf

ผลลัพธ์: PDF พร้อมข้อความN(และหมายเลขหน้า 1)


0

Python 3 แคร็ก!

การเขียนนี่มันเฮฮาถึงแม้ว่ามันจะแตกได้ง่ายในตอนท้าย :)

Z,O=__import__('time').strftime,401*5;from base64 import*;Q,I=(Z('%Y')),(O/401)*2;_=int(Q);D,P=(O,-~_),int(Q[~1:]);Q,I=(6+(P-eval(b64decode(b'KHN1bShbeCU0PDEgZm9yIHggaW4gcmFuZ2UobWluKEQpLG1heChEKSldKSk=').decode()+'*-1'*(O>_)))/10,'3'+repr(((P-10)*3)+10));print(Q,I)

ข้อความที่เข้ารหัส base64:(sum([x%4<1 for x in range(min(D),max(D))]))
บลู

อ๋อเพียงแค่ขว้างมันเพื่อความสนุก @BlueEyedBeast
FlipTack

ด้วยเหตุผลบางอย่าง. การแทนที่สตริงที่ถอดรหัสในนั้นทำให้ TypeError>.>
Yodle

@Yodle รหัสเดิมใช้งานได้หรือไม่ ถ้าเป็นเช่นนั้นเพียงตรวจสอบให้แน่ใจว่าคุณแทนที่สตริงที่ถอดรหัสแล้วอย่างถูกต้อง
FlipTack

ใช่แล้วซึ่งเป็นเหตุผลที่ฉันสับสนมากฮ่าฮ่า ฉันค่อนข้างแน่ใจว่าฉันทำถูกต้องเพียงแค่ลบ base64decode (... ). decode () ด้วยสายอักขระใช่ไหม
Yodle





0

C ++ 14, แคร็ก

#include<vector>

auto h(auto i){return 0;}
auto h(auto i, auto x, auto...p){
 return x+(i-1?h(i-1,p...):0);
}

auto g(auto v){return v;}
auto g(auto v,auto x, auto...p){
 v.push_back(h(x,x,p...));
 return g(v,p...);
}

auto f(auto...p){
 return g(std::vector<int>{},p...);
}

ใช้เวลาจำนวน variadic vector<int>ของพารามิเตอร์และผลตอบแทน

การใช้งาน:

int main() {
 auto v = f(4,7,3,4,5);
 for (auto i:v) std::cout << i << ", ";
 std::cout << std::endl;
}

ชื่อบอกว่า C ++ 14 ดังนั้นคุณต้องมีอย่างน้อยg++และถ้ารุ่นของคุณไม่ได้อย่างน้อย6.2หรือบางสิ่งที่คุณต้องการ-std=c++14
46890


0

Mathematica, 34 ไบต์, แคร็ก

±1={±0={}};±n_:=Array[±#&,n,0]

ฟังก์ชันที่มีชื่อ ( ±)


ฉันไม่สามารถบอกได้ว่ามันเป็นแบบนี้หรือเปล่าและคุณมองข้ามกฎ "ไม่มีตัวเลข 0 ถึง 9 เพื่อให้ปรากฏในรหัส" หรือไม่หรือคุณเป็นแบบนี้และคุณตัดสินใจที่จะใส่รหัสที่ไม่น่าสนใจสำหรับความงงงวย
Martin Ender

อ๊ะเป็นคนแรก แต่ฉันพลาดกฎไปทั้งหมด ... ฉันจะเปลี่ยนรหัสให้เหมาะกับอีก :) :)
JungHwan Min

แตกแล้ว ;)
Martin Ender


0

Python 2.7, 45 ไบต์

import numpy;lambda a,n,t:numpy.arange(a,t,n)

คำแนะนำ (หรืออาจจะไม่): "ปลากำลังใช้งาน numpy"

2016.11.23 - คำใบ้ที่สอง: "อย่าปล่อยอะไรให้ลอยไป!"


อินพุตทั้งสามจำเป็นอย่างเคร่งครัดหรือไม่? สิ่งนี้สามารถใช้งานได้หรือไม่หากคุณใส่รหัสอย่างน้อยหนึ่ง (หรือมากกว่า) ของอินพุต
Stewie Griffin

@StewieGriffin ใช่ คำถามต้องมีอินพุตสามตัวอย่างชัดเจน ทั้งในข้อความและในกรณีทดสอบ
agtoever
โดยการใช้ไซต์ของเรา หมายความว่าคุณได้อ่านและทำความเข้าใจนโยบายคุกกี้และนโยบายความเป็นส่วนตัวของเราแล้ว
Licensed under cc by-sa 3.0 with attribution required.