Quando um número é mostrado em uma calculadora, é possível considerar como seriam as várias transformações desse número. Por exemplo, em uma exibição de sete segmentos, 2 é mostrado assim:

E quando virado horizontalmente, fica assim:

Como tal, a imagem espelhada de 2 é 5.

A tarefa neste desafio é pegar um número de um dígito e retornar o número que é sua imagem espelhada (se possível). Se a imagem espelhada não parecer um número, retorne o número girado 180 graus (se possível). Se nenhum desses for o caso, retorne -1.

Aqui está a lista completa de entradas e saídas que seu programa precisa gerenciar:

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

Como um desafio de código-golfe , o código mais curto vence!

Haskell - 43 31

43 caracteres sem nada extravagante.

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

Reduziu para 31 caracteres, tornando-a uma função parcial.

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

GolfScript, 15 14

Li as especificações novamente e descobri que a entrada deve ser uma string.

"0.5..29.86"\?

Para correr:

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

Versão antiga (que possui entrada inteira):

[0.5..2 9.8 6]?

O mais recente (14 bytes) é um pouco inspirado na resposta do CJam pelo 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 bytes

q25691347`"5296W"er~

Experimente online.

Resultado

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

Como funciona

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 Bytes

Eu acho que os comentaristas estão certos, apesar de o Befunge ser uma linguagem em 2D, é um pouco diferente. Ainda assim, neste instante, os comentaristas estão certos.

&1g01g-.  
! &  #* )'

Passos:

&

Lê a entrada como um valor numérico x e a pressiona na pilha.

1g

Obtém o valor do caractere c (então, como '!' = 33 ou '*' = 42. Uma célula vazia = 32) na posição x, 1.

01g-.

Lê o valor de caractere da célula 0,1 (33), subtrai-o de c e o gera como um valor numérico.

Java - 49

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

Aqui 0x790a300601está um valor recheado com as saídas desejadas, com uma adicionada para torná-las positivas. Os valores são armazenados em petiscos dentro do valor, portanto, é necessário um pouco de mudança e mascaramento para destacá-los.

Java - 100 (opção divertida)

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

Não é a menor opção, mas um pouco de diversão. Encontrei uma semente aleatória que produz os valores corretos quando chamada X vezes (onde 0> = X <= 9).

JavaScript (ECMAScript 6) 25

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

JavaScript (ECMAScript 5) 43

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

ATUALIZAÇÃO: edc65 sugeriu uma técnica muito melhor. A escova de dentes sugeriu uma linguagem muito melhor. Neste ponto, minhas principais contribuições são depuração e bom senso.

festança 29

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

por exemplo

$ 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

Esta função retorna o elemento xda matriz0 -1 5...

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

Exemplos:

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

JavaScript 36 37. 41.

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

como função ES6 - 27:

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

Sclipting, 11 caracteres

걄럣뉥밈결⓷方分결剩貶

Finalmente, encontrei um computador Windows com o Visual Studio instalado para criar seu intérprete. E derrotou meu código GolfScript facilmente.

Lê 18453063256\11\?/11%(no GolfScript.

J - 28 27 bytes

Você sabe do que eu gosto? Simplicidade (28 bytes). Observe que em J, _1é negativo (-1).

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

Adicione um pouco de complexidade e você terá 27 bytes.

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

Exemplo:

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

CJam - 14

Versão de entrada / saída:

"0 5  29 86"q#

Versão da pilha (assume que o número está na pilha):

[0W5WWY9W8 6]=

Experimente-os em http://cjam.aditsu.net/

Perl, 27 26

Contagem inclui a pbandeira

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

Uso:

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

Espere, Perl acabou de derrotar J? :)

Marbelous 34 bytes

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

Não é a solução mais curta, mas também não é a mais longa.

Como funciona

}0gera um mármore representando a primeira entrada da linha de comando. Esse mármore desce o próximo carrapato para a =6célula. =6é uma célula de comparação, empurra qualquer mármore com valor 6 para baixo e todos os outros para a direita. Essa linha de células de comparação empurra os mármores para a direita até atingirem o valor desejado. 0 e 8 simplesmente caem e são impressos quando caem da parte inferior do quadro, 6 e 2 e 9 e 5 primeiro adicionam 3, subtraídos deles respectivamente. Se uma bola de gude não é igual a nenhum dos valores desejados, ele cair na ?0célula, o que transformar qualquer mármore em um 0 mármore ¹ . Este mármore então é diminuído e cai do tabuleiro.

_{¹ Um ?nmármore transforma tecnicamente qualquer mármore em mármore entre 0 e n. Isso tem o bom efeito colateral que ?0transforma qualquer coisa em 0.}

MATLAB - 35

Gostaria de envolver isso em uma função com ncomo o único parâmetro.

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

35 caracteres.

ECMAScript 6, 24

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

Usando JavaScript normal, seria 33:

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

TI-BASIC, 24 22

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

Isso codifica as saídas possíveis em uma tabela de pesquisa armazenada como um número de ponto flutuante de base 11; o (N + 1) é o décimo primeiro dígito da base 11 depois que o ponto decimal é extraído da tabela para obter o valor do dígito invertido. Na base 11, o número é .106003A097e os dígitos deste menos um são exatamente0,-1,5,-1,-1,2,9,-1,8,6 .

O truque do edc65 de subtrair um no caso de 6 leva a essa solução de 24 bytes, onde ⑩^(está um único token de um byte:

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

A abordagem de cadeia é de 29 bytes:

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

A abordagem de matriz (que Ypnpyn também adotou) é de 30 bytes, assumindo que o número seja armazenado em X:

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

24 -> 22: Removidos dois dígitos extras de precisão na constante mágica.

C - 47 bytes [48 bytes]

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

Para adicionar E / S (que outras respostas nem sempre) para 86 bytes:

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

Execute-o no console do seu navegador

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

C - 117 108 106 77 76 bytes

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

Não é o melhor idioma para jogar golfe, mas tudo bem ...
Compile com gcc progname.c -o progname. (Ignore os avisos ou adicione -include stdio.hao comando compilar.)

Uso: ./progname <número>

EDITAR

Conforme a sugestão de @ bebe, aqui está um exemplo que usa a entrada de STDIN:

C - 68 51 bytes

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

J (24, função)

(o painel de entrada não está funcionando bem. Cole o seguinte em um intérprete python e minha resposta será revelada :)

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 bytes (não concorrente)

0®5®®Y9®8 6¹@

Experimente online!

-3 graças a Emigna .

Explicação:

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

Agradecimentos a Jörg Hülsermann

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

Experimente online!

versões mais antigas

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

Experimente online!

Gelatina , 14 bytes (não concorrente)

ị“-5--29-860”V

Experimente online!

Explicação:

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