Lorsqu'un nombre est affiché sur une calculatrice, il est possible de considérer à quoi ressembleraient les différentes transformations de ce nombre. Par exemple, sur un affichage à sept segments, 2 s'affiche comme suit:

Et lorsqu'il est retourné horizontalement, il ressemble à ceci:

En tant que tel, l'image miroir de 2 est 5.

La tâche dans ce défi est de prendre un nombre à un chiffre et de renvoyer le numéro qui est son image miroir (si possible). Si son image miroir ne ressemble pas à un nombre, renvoyez le nombre pivoté de 180 degrés (si possible). Si aucun de ces éléments n'est le cas, retournez -1.

Voici la liste complète des entrées et sorties que votre programme doit gérer:

Input   Output
0       0
1       -1
2       5
3       -1
4       -1
5       2
6       9
7       -1
8       8
9       6

En tant que défi de code-golf , le code le plus court gagne!

Haskell - 43 31

43 personnages sans rien d'extraordinaire.

f 0=0
f 8=8
f 2=5
f 5=2
f 6=9
f 9=6
f _= -1

Je l'ai réduit à 31 caractères en en faisant une fonction partielle.

f=([0,-1,5,-1,-1,2,9,-1,8,6]!!)

GolfScript, 15 14

J'ai relu la spécification et j'ai constaté que l'entrée devait être une chaîne.

"0.5..29.86"\?

Courir:

echo -n 2 | ruby golfscript.rb a.gs

Ancienne version (qui a une entrée entière):

[0.5..2 9.8 6]?

Le plus récent (14 octets) est quelque peu inspiré par la réponse CJam d'Aditsu .

PowerShell - 27

'0 5  29 86'.indexof($args)

Python 2.x - 28

'015..29.86'.find(`input()`)

JavaScript 37 36

alert("0_5__29_86".search(prompt()))

CJam, 20 octets

q25691347`"5296W"er~

Essayez-le en ligne.

Production

$ for i in {0..9}; { cjam <(echo 'q25691347`"5296W"er~') <<< $i; echo; }
0
-1
5
-1
-1
2
9
-1
8
6

Comment ça fonctionne

q          " Read from STDIN. The leaves a string on the stack.            ";
25691347`  " Push the string '25691347'.                                   ";
"5296W"    " Push the string '5296W'.                                      ";
er         " Perform character transliteration.                            ";
~          " Evaluate the result. Examples: '2' returns 2, 'W' returns -1. ";

BEFUNGE 93 - 18 14 20 octets

Je suppose que les commentateurs ont raison, bien que Befunge soit un langage 2d, c'est un peu différent. Pourtant, à cet instant, les commentateurs ont raison.

&1g01g-.  
! &  #* )'

Pas:

&

Lit l'entrée sous la forme d'une valeur numérique x et la pousse sur la pile.

1g

Obtient la valeur de caractère c (donc, comme '!' = 33, ou '*' = 42. Une cellule vide = 32) à la position x, 1.

01g-.

Lit la valeur de caractère de la cellule 0,1 (33), la soustrait de c et la renvoie sous forme de valeur numérique.

Java - 49

long f(int a){return(0x790a300601L>>(a*4)&15)-1;}

Ici, 0x790a300601est une valeur bourrée des sorties souhaitées, avec une valeur ajoutée pour les rendre positives. Les valeurs sont stockées dans des quartets à l'intérieur de la valeur, donc un peu de décalage et de masquage est nécessaire pour les faire apparaître.

Java - 100 (option amusante)

int f(int a){Random r=new Random(0x2000A2F47D6Fl);int b=0;for(;a>=0;a--)b=r.nextInt(11)-1;
return b;}

Pas la plus petite option, mais un peu de plaisir. J'ai trouvé une graine aléatoire qui produit les valeurs correctes lorsqu'elle est appelée X fois (où 0> = X <= 9).

JavaScript (ECMAScript 6) 25

x=>'1060039097'[x]-(x!=6)

JavaScript (ECMAScript 5) 43

function f(x){return'1060039097'[x]-(x!=6)}

MISE À JOUR: edc65 a suggéré une bien meilleure technique. brosse à dents a suggéré une bien meilleure langue. À ce stade, mes principales contributions sont le débogage et la gomination.

bash 29

tr 1-9 x5xx29x86|sed s/x/-1/g

par exemple

$ echo 0 1 2 3 4 5 6 7 8 9 | tr 1-9 x5xx29x86|sed s/x/-1/g
0 -1 5 -1 -1 2 9 -1 8 6

Kona - 29

Cette fonction renvoie l'élément xdu tableau0 -1 5...

f:{0 -1 5 -1 -1 2 9 -1 8 6@x}

Exemples:

> f 2
  5
> f 5
  2
> f 8
  8

JavaScript 36 37 41

alert('0x'+'65b558f5ec'[prompt()]-6)

comme fonction ES6 - 27:

f=v=>'0x'+'65b558f5ec'[v]-6

Sclipting, 11 caractères

걄럣뉥밈결⓷方分결剩貶

Enfin, j'ai trouvé un ordinateur Windows avec Visual Studio installé pour construire son interpréteur. Et il a facilement battu mon code GolfScript.

Il lit 18453063256\11\?/11%(en GolfScript.

J - 28 27 octets

Tu sais ce que j'aime? Simplicité (28 octets). Notez que dans J, _1est négatif (-1).

f=:{&0 _1 5 _1 _1 2 9 _1 8 6

Ajoutez un peu de complexité et vous avez 27 octets.

f=:-{&0 2 _3 4 5 3 _3 8 0 3

Exemple:

   f 2
5
   f 6
9
   f 5
2
...

CJam - 14

Version entrée / sortie:

"0 5  29 86"q#

Version de la pile (suppose que le numéro est sur la pile):

[0W5WWY9W8 6]=

Essayez-les sur http://cjam.aditsu.net/

Perl, 27 26

Le nombre comprend le pdrapeau

y/2569/5296/,s/[1347]/-1/

Usage:

$ echo 7 | perl -pe y/2569/5296/,s/[1347]/-1/
-1

Attendez, Perl vient de battre J? :)

Marbelous 34 octets

}0
=6=9=2=5=0=8?0
+3-3+3-3....--

Ce n'est pas la solution la plus courte, mais ce n'est pas la plus longue non plus.

Comment ça fonctionne

}0génère une bille représentant la première entrée de ligne de commande. Ce marbre descend la tique suivante, sur la =6cellule. =6est une cellule de comparaison, elle pousse toute bille de valeur 6 vers le bas et toutes les autres vers la droite. Cette gamme de cellules de comparaison pousse les billes vers la droite jusqu'à ce qu'elles égalent la valeur souhaitée. 0 et 8 tombent et s'impriment quand ils tombent du bas de la planche, 6 et 2, et 9 et 5 obtiennent d'abord 3 ajoutés à eux, soustraits d'eux respectivement. Si une bille ne correspond à aucune des valeurs souhaitées, elle atterrit sur la ?0cellule, ce qui transforme n'importe quelle bille en 0 bille ¹ . Ce marbre est ensuite décrémenté et tombe du plateau.

_{¹ Une ?nbille transforme techniquement n'importe quelle bille en bille entre 0 et n. Cela a le bel effet secondaire qui ?0transforme n'importe quoi en 0.}

MATLAB - 35

Je voudrais envelopper cela dans une fonction avec ncomme seul paramètre.

f=[0,-1,5,-1,-1,2,9,-1,8,6];
f(n+1)

35 caractères.

ECMAScript 6, 24

f=x=>~-++'0n5nn29n86'[x]

En utilisant JavaScript normal, ce serait 33:

alert(~-++'0n5nn29n86'[prompt()])

TI-BASIC, 24 22

-1+int(11fPart(11^Ans.0954191904

Cela code les sorties possibles dans une table de recherche stockée sous la forme d'un nombre à virgule flottante en base 11; le (N + 1) ème chiffre de base 11 après le point décimal est extrait du tableau pour obtenir la valeur du chiffre inversé. Dans la base 11, le nombre est .106003A097, et les chiffres de celui-ci sont exactement 0,-1,5,-1,-1,2,9,-1,8,6.

L'astuce d'edc65 de soustraire un dans le cas de 6 conduit à cette solution de 24 octets, où ⑩^( trouve un seul jeton d'un octet:

-(Ans≠6)+int(10fPart(.1060039097⑩^(Ans

L'approche chaîne est de 29 octets:

-(Ans≠6)+expr(inString("1060039097",Ans+1,1

L'approche par tableau (qu'Ypnpyn a également adoptée) est de 30 octets, en supposant que le nombre est stocké dans X:

{1,0,6,0,0,3,10,0,9,7}-1:Ans(X+1

24 -> 22: Suppression de deux chiffres supplémentaires de précision dans la constante magique.

C - 47 octets [au lieu de 48 octets]

f(i){return(int[]){1,0,6,0,0,3,10,0,9,7}[i]-1;}

Pour ajouter des E / S (que les autres réponses n'ont pas toujours) pour 86 octets:

main(i){i=(int[]){1,0,6,0,0,3,10,0,9,7}[getchar()-48]-1;i<0?puts("-1"):putchar(i+48);}

Python - 34

f=lambda n:ord("A@F@@CJ@IG"[n])-65

Java, 58 59

int f(int i){int[]a={1,0,6,0,0,3,10,0,9,7};return a[i]-1;}

OU

int f(int i){return new int[]{1,0,6,0,0,3,10,0,9,7}[i]-1;}

JavaScript 42 37

Exécutez-le sur la console de votre navigateur

alert(~-[1,,6,,,3,10,,9,7][prompt()])

C - 117 108 106 106 77 76 octets

a[]={1,0,6,0,0,3,10,0,9,7};main(int c,char**b){printf("%d",a[*b[1]-48]-1);}

Pas la meilleure langue pour jouer au golf, mais bon ...
Compilez avec gcc progname.c -o progname. (Ignorez les avertissements ou ajoutez-include stdio.h à la commande de compilation.)

Utilisation: ./progname <numéro>

ÉDITER

Selon la suggestion de @ bebe, voici un exemple qui prend à la place l'entrée de STDIN:

C - 68 51 octets

main(){printf("%d","106003:097"[getchar()-48]-49);}

J (24, fonction)

(le panneau de saisie ne joue pas bien. Collez ce qui suit dans un interpréteur python et ma réponse sera révélée :)

print "f=:{&(_3+3 u:'^C^B^B^E^L^B^K\t')"

Clojure - 36

#(case % 2 5 5 2 6 9 9 6 0 0 8 8 -1)

05AB1E , 13 octets (non concurrents)

0®5®®Y9®8 6¹@

Essayez-le en ligne!

-3 merci à Emigna .

Explication:

0®5®®Y9®8 6¹@ Takes an integer from STDIN.
0®5®®Y9®8 6   Push 0, r=-1, 5, r=-1, r=-1, Y=2, 9, r=-1, 8, 6.
           ¹  Push first input item.
            @ Pop and push the 0-indexed stack item at the respective index.

PHP, 48 39 bytes

Thanks to Jörg Hülsermann

<?=[0,-1,5,-1,-1,2,9,-1,8,6][$argv[1]];

Try it online!

Older versions

$m=-1;echo [0,$m,5,$m,$m,2,9,$m,8,6][$argv[1]];

Try it online!

Jelly, 14 bytes (non-competing)

ị“-5--29-860”V

Try it online!

Explanation:

ị“-5--29-860”V Takes argument as an integer.
 “-5--29-860”  "-5--29-860" (1-indexed string).
ị              Return the xth char of the string above (y) (x=argument).
             V Eval. - is the same as -1.