"เมทริกซ์จากน้อยไปมาก" เป็นเมทริกซ์ที่ไม่มีที่สิ้นสุดของจำนวนเต็ม (รวม 0) ซึ่งองค์ประกอบใด ๆ เป็นองค์ประกอบที่มีขนาดเล็กที่สุดซึ่งไม่เคยใช้ในแถวและคอลัมน์นั้นมาก่อน:

  | 1 2 3 4 5 6 ...
--+----------------
1 | 0 1 2 3 4 5 ...
2 | 1 0 3 2 5 4 ...
3 | 2 3 0 1 6 7 ...
4 | 3 2 1 0 7 6 ...
5 | 4 5 6 7 0 1 ...
6 | 5 4 7 6 1 0 ...
. | ...............

งานของคุณคือการเขียนโปรแกรมที่จะส่งออกองค์ประกอบที่พบในแถวและคอลัมน์ที่ระบุโดยการป้อนข้อมูล (อินพุตและเอาต์พุตมาตรฐาน)

กรณีทดสอบ:

5 3 -> 6
2 5 -> 5

ใช้กฎของรหัสกอล์ฟ - รหัสที่สั้นที่สุดชนะ

ป.ล. แม้ว่าสิ่งนี้จะมีลักษณะของอัลกอริทึม แต่รหัสก็สามารถรัดกุมมากได้

แก้ไข:ฉันไม่ได้คาดหวังว่าจะเห็นทางออกของ xor ตั้งแต่ต้น ฉันหวังว่าจะเห็น 10 โพสต์ด้วยวิธีอัลกอริทึมและจากนั้นโซลูชัน xor ตอนนี้เมื่อทราบว่ามันไม่สนุกมากที่จะเห็นวิธีการเขียน xor ในภาษาต่าง ๆ ฉันขอแนะนำให้คุณลองใช้วิธีอัลกอริทึม

ดังนั้นใช่ฉันคิดว่าไม่มีใครสามารถเอาชนะเครื่องหมาย 5 ตัวได้ในตอนนี้ดังนั้นฉันขอแสดงความยินดีกับ Ilmari Karonen สำหรับวิธีแก้ปัญหาที่ฉลาดและสั้นที่สุด แต่มีความท้าทายใหม่ขึ้นข้างหน้า: เขียนวิธีการแก้ปัญหาอัลกอริทึมที่สั้นที่สุด

GolfScript 5 ตัวอักษร

~(\(^

แท้จริงแล้วงานนี้ง่ายมากเมื่อคุณรับรู้รูปแบบ บิตที่น่าอึดอัดใจเพียงอย่างเดียวคือการจัดทำดัชนีแบบ 1 หากดัชนีอินพุทเป็นแบบอิงศูนย์โซลูชัน 2 ตัวอักษรนี้น่าจะพอเพียง:

~^

เพื่ออธิบายสิ่งนี้แก่ผู้อ่านที่ไม่คุ้นเคยกับ GolfScript ~คำสั่งจะทำการแปลงค่าอินพุตให้เหลือตัวเลขสองตัวบนสแต็ก ^จากนั้น XORs ตัวเลขสูงสุดสองตัวบนสแต็กเข้าด้วยกันโดยปล่อยให้ผลลัพธ์ออกมา ในการจัดการกับอินพุตแบบอิง 1 จำเป็นต้องใช้คำสั่งอีกสองคำสั่ง: (ลดจำนวนสูงสุดบนสแต็กทีละหนึ่งขณะที่\สลับรายการสองอันดับแรกบนสแต็ก

Mathematica 10 44

แก้ไข

คำตอบแรกของฉันขึ้นอยู่กับความเข้าใจผิดเกี่ยวกับธรรมชาติของความท้าทายตามที่ Ilmari ระบุไว้ ลองอีกครั้ง

การใช้

f[n___, 1, n___] := n - 1;
j_~f~k_ := BitXor[j - 1, k - 1]

K, 31

{0b/:{(x|y)&~x~y}. 0b\:'-1+x,y}

ตรรกะ XOR ของ Stole Ilmari Karonen ซึ่งฉันจะไม่มีวันได้เห็นตัวเอง

PHP, 38

เพียงใช้งานง่ายกับ XOR ของ Ilmari Karonen

<?php echo --$_GET['a']^--$_GET['b']?>

การใช้งาน:

... / xor.php อย่างไร = 4 & B = 7

จะพิมพ์ 6

Haskell 174

คิดว่าฉันจะแก้ปัญหาที่ไม่พึ่งพา XOR ขี้เกียจเกินไปที่จะเล่นกอล์ฟอย่างถูกต้อง

a 0 0=0
a b c
 |m==n=a(b-m)(c-n)
 |m>n=m+a(b-m)c
 |m<n=n+a b(c-n)
 where{g f=until(>f)(*2)1`div`2;m=g b;n=g c;}
main=do
 [x,y]<-fmap(map read.words)getLine
 print$a(x-1)(y-1)

แก้ไข:ฉันตระหนักได้ในวันต่อมาว่านี่เป็นเพียงการคำนวณ XOR ดังนั้นหากนับเป็นวิธีแก้ปัญหาอัลกอริทึมดังนั้น Ilmari Karonen จึงควร

Python 2, 36

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

ขอบคุณ @IlmariKaronen สำหรับทางลัดที่เจ๋งมาก

ขอบคุณ @Gareth สำหรับรหัสด้านล่าง

import sys
print(input()-1^input()-1)

Python 3, 56

โปรแกรมต้นฉบับที่ฉันเขียน

import sys
x=int(input())
y=int(input())
x-=1
y-=1
print(x^y)

IDEONE ที่มี 2 และ 5

IDEONE ที่มี 3 และ 3

MATL , 2 ไบต์

Z~

ลองออนไลน์!

MATL แสดงความท้าทายเป็นเวลาหลายปี แต่การจัดทำดัชนีแบบอิงตามธรรมชาติและฟังก์ชั่น xor ระดับบิตทำให้สิ่งนี้ดีและเรียบร้อย!

Perl 5 , 12 ไบต์

say<>-1^<>-1

ลองออนไลน์!

Javascript 13 ไบต์

a=>b=>--a^--b

f=a=>b=>--a^--b

result = document.getElementById('result')

<input type="text" onkeyup="result.innerHTML = f(this.value.split(',')[0])(this.value.split(',')[1])" >
<p id="result"></p>

Japt , 5 ไบต์

UÉ^VÉ

ลองออนไลน์!