La "matrice ascendante" est une matrice infinie de nombres entiers (0 inclus) dans laquelle tout élément est le plus petit élément disponible qui n'a pas été précédemment utilisé sur la ligne et la colonne respectives:

  | 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 ...
. | ...............

Votre tâche consiste à écrire un programme qui affichera l'élément trouvé à la ligne et à la colonne spécifiées par l'entrée. (entrée et sortie standard)

Cas de test:

5 3 -> 6
2 5 -> 5

Les règles du Code Golf s'appliquent: le code le plus court l'emporte.

PS Même si cela a un caractère algorithmique, le code peut être très, très concis.

EDIT: Je ne m'attendais pas à voir la solution xor si tôt. J'espérais vraiment voir 10 messages avec une approche algorithmique et ALORS la solution xor. Maintenant, sachant que ce n'est pas très amusant de voir comment écrire xor dans différentes langues, je vous recommande également d'essayer une approche algorithmique.

Donc, oui, je pense que personne ne peut battre la barre des 5 caractères maintenant - donc je félicite Ilmari Karonen pour la solution la plus intelligente et la plus courte. Mais il y a un nouveau défi à venir: écrire la solution algorithmique la plus courte .

GolfScript, 5 caractères

~(\(^

En effet, cette tâche est très simple une fois que vous reconnaissez le motif. Le seul bit gênant est l'indexation basée sur 1 - si les indices d'entrée étaient basés sur zéro, cette solution à 2 caractères suffirait:

~^

Pour expliquer cela aux lecteurs peu familiers avec GolfScript, la ~commande évalue l'entrée, laissant les deux nombres sur la pile. ^puis XORs les deux nombres supérieurs de la pile ensemble, laissant le résultat pour la sortie. Pour gérer une entrée basée sur 1, deux commandes supplémentaires sont nécessaires: (décrémente le numéro le plus haut de la pile d'une \unité , tandis que permute les deux éléments supérieurs de la pile.

Mathematica 10 44

Éditer

Ma première réponse était basée sur un malentendu sur la nature du défi, comme l'a noté Ilmari. Voici un autre essai.

Usage

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}

J'ai volé la logique XOR d'Ilmari Karonen, que je n'aurais jamais repérée moi-même.

PHP, 38

Juste une simple implémentation du XOR d'Ilmari Karonen

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

Usage:

... / xor.php? a = 4 & b = 7

imprimera 6

Haskell 174

Je pensais que je ferais une solution qui ne reposait pas sur XOR. Trop paresseux pour jouer au golf correctement.

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)

Edit: J'ai réalisé un jour plus tard que ce n'est que du calcul XOR. Ainsi, si cela compte comme une solution algorithmique, il devrait en être de même pour Ilmari Karonen.

Python 2, 36

Je suppose que depuis que je commence à peine à apprendre Python que ce serait le moment idéal pour soumettre ma première réponse en l'utilisant (et personne n'a répondu en utilisant Python) et peut-être que je pourrais recevoir des commentaires.

Merci @IlmariKaronen pour le raccourci très cool.

Merci @Gareth pour le code ci-dessous.

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

Python 3, 56

Le programme original que j'avais écrit.

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

IDEONE avec 2 et 5

IDEONE avec 3 et 3

MATL , 2 octets

Z~

Essayez-le en ligne!

MATL retarde le défi de plusieurs années, mais bon, l'indexation naturelle basée sur 1 et une fonction xor au niveau du bit rendent cela agréable et soigné!

Perl 5 , 12 octets

say<>-1^<>-1

Essayez-le en ligne!

Javascript 13 octets

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 octets

UÉ^VÉ

Essayez-le en ligne!