เมื่อตัวเลขปรากฏบนเครื่องคิดเลขเป็นไปได้ที่จะพิจารณาการเปลี่ยนรูปของตัวเลขนั้น ๆ ตัวอย่างเช่นบนจอแสดงผลเจ็ดส่วน 2 จะแสดงดังนี้:

และเมื่อพลิกในแนวนอนดูเหมือนว่า:

ดังนั้นภาพสะท้อนในกระจกของ 2 คือ 5

ภารกิจในการท้าทายนี้คือการใช้ตัวเลขหนึ่งหลักและส่งกลับตัวเลขที่เป็นภาพสะท้อน (ถ้าเป็นไปได้) หากภาพสะท้อนของกระจกนั้นไม่เหมือนตัวเลขให้ส่งคืนตัวเลขที่หมุนไป 180 องศา (ถ้าเป็นไปได้) หากไม่ใช่กรณีเหล่านี้ให้ส่งคืน -1

นี่คือรายการอินพุตและเอาต์พุตแบบเต็มรูปแบบที่โปรแกรมของคุณต้องการจัดการ:

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

ในฐานะที่เป็นความท้าทายรหัส - กอล์ฟรหัสที่สั้นที่สุดชนะ!

Haskell - 43 31

43 ตัวอักษรโดยไม่ต้องนึกอะไร

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

บันทึกลงเหลือ 31 ตัวอักษรโดยทำให้ฟังก์ชั่นบางส่วน

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

GolfScript, 15 14

ฉันอ่านข้อมูลจำเพาะอีกครั้งและพบว่าอินพุตต้องเป็นสตริง

"0.5..29.86"\?

วิ่ง:

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

รุ่นเก่า (ซึ่งมีอินพุตจำนวนเต็ม):

[0.5..2 9.8 6]?

หนึ่งใหม่ (14 ไบต์) เป็นแรงบันดาลใจบ้างโดยคำตอบ CJam โดย 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 ไบต์

q25691347`"5296W"er~

ลองออนไลน์

เอาท์พุต

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

มันทำงานอย่างไร

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

ก่อนหน้านี้ 93 - 18 14 20 ไบต์

ฉันเดาว่าผู้แสดงความคิดเห็นถูกต้องแม้ว่า Befunge ที่เป็นสายภาษา 2 มิตินั้นแตกต่างกันมาก ยังในทันทีนี้ผู้แสดงความคิดเห็นที่ถูกต้อง

&1g01g-.  
! &  #* )'

ขั้นตอน:

&

อ่านอินพุตเป็นค่าตัวเลข x และกดลงบนสแต็ก

1g

รับค่าอักขระ c (ดังนั้นเช่น '!' = 33 หรือ '*' = 42 เซลล์ว่าง = 32) ที่ตำแหน่ง x, 1

01g-.

อ่านค่าอักขระของเซลล์ 0,1 (33) ลบออกจาก c และส่งออกเป็นค่าตัวเลข

Java - 49

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

นี่0x790a300601คือค่าที่อัดแน่นไปด้วยเอาต์พุตที่ต้องการโดยมีค่าเพิ่มเพื่อทำให้เป็นบวก ค่าจะถูกเก็บไว้ใน nibbles ภายในค่าดังนั้นต้องเลื่อนบิตและปิดบังเล็กน้อยเพื่อให้ปรากฏออกมา

Java - 100 (ตัวเลือกที่สนุก)

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

ไม่ใช่ตัวเลือกที่เล็กที่สุด แต่สนุกไปหน่อย ฉันพบเมล็ดสุ่มที่สร้างค่าที่ถูกต้องเมื่อเรียกว่าXคูณ (โดยที่ 0> = X <= 9)

JavaScript (ECMAScript 6) 25

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

JavaScript (ECMAScript 5) 43

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

ปรับปรุง: edc65 ได้แนะนำเทคนิคที่ดีกว่ามาก แปรงสีฟันได้แนะนำภาษาที่ดีกว่ามาก ณ จุดนี้การมีส่วนร่วมหลักของฉันคือการแก้จุดบกพร่องและ gumption

ทุบตี 29

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

เช่น

$ 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

โคนา - 29

ฟังก์ชันนี้ส่งคืนองค์ประกอบxจากอาร์เรย์0 -1 5...

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

ตัวอย่าง:

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

JavaScript 36 37 41

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

เป็นฟังก์ชั่น ES6 - 27:

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

Sclipting 11 ตัวอักษร

걄럣뉥밈결⓷方分결剩貶

ในที่สุดฉันก็พบคอมพิวเตอร์ Windows ที่ติดตั้ง Visual Studio เพื่อสร้างล่าม และมันก็เอาชนะรหัส GolfScript ของฉันได้อย่างง่ายดาย

มันอ่าน18453063256\11\?/11%(ใน GolfScript

J - 28 27 ไบต์

คุณรู้ว่าฉันชอบอะไร ความเรียบง่าย (28 ไบต์) โปรดทราบว่าใน J _1เป็นลบหนึ่ง (-1)

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

เพิ่มความซับซ้อนเล็กน้อยและคุณมี 27 ไบต์

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

ตัวอย่าง:

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

CJam - 14

รุ่นอินพุต / เอาต์พุต:

"0 5  29 86"q#

รุ่นสแต็ค (ถือว่าตัวเลขอยู่ในสแต็ก):

[0W5WWY9W8 6]=

ลองใช้ที่http://cjam.aditsu.net/

Perl, 27 26

นับรวมถึงpธง

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

การใช้งาน:

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

เดี๋ยวก่อน Perl เพิ่งเอาชนะ J หรือเปล่า? :)

Marbelous 34 bytes

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

It's not the shortest solution, but it's not the longest either.

How it works

}0 spawns a marble representing the first command line input. This marble drops down the next tick, onto the =6 cell. =6 is a comparison cell, it pushes any marble with value 6 down and all others to the right. This line-up of comparison cells pushes marbles right until they equal a desired value. 0 and 8 just fall through and get printed when tehy fall off the bottom of the board, 6 and 2, and 9 and 5 first get 3 added to them, subtracted from them respectively. If a marble doesn't equal any of the desired values, it lands on the ?0 cell, which turn any marble into a 0 marble¹. This marble then gets decremented and falls off the board.

_{¹ A ?n marble technically turns any marble into a marble between 0 and n. This has the nice side effect that ?0 turns anything into 0.}

MATLAB - 35

I would wrap this in a function with n as the only parameter.

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

35 characters.

ECMAScript 6, 24

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

Using normal JavaScript it would be 33:

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

TI-BASIC, 24 22

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

This encodes the possible outputs in a lookup table stored as a base-11 floating point number; the (N+1)th base-11 digit after the decimal point is extracted from the table to get the value of the inverted digit. In base 11 the number is .106003A097, and the digits of this less one are exactly 0,-1,5,-1,-1,2,9,-1,8,6.

edc65's trick of subtracting one in the case of 6 leads to this 24-byte solution, where ⑩^( is a single one-byte token:

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

The string approach is 29 bytes:

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

The array approach (which Ypnpyn also took) is 30 bytes, assuming the number is stored in X:

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

24 -> 22: Removed two extra digits of precision in the magic constant.

C - 47 bytes [was 48 Bytes]

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

To add I/O (which other answers didn't always) for 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;}

OR

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

JavaScript 42 37

Run it on the console of your browser

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);}

Not the best language for golfing, but oh well...
Compile with gcc progname.c -o progname. (Ignore the warnings, or add -include stdio.h to the compile command.)

Usage: ./progname <number>

EDIT

As per @bebe's suggestion, here is an example that takes the input from STDIN instead:

C - 68 51 bytes

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

J (24, function)

(the input panel isn't playing nice. Paste the following in a python interpreter and my answer shall be revealed:)

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 (non-competing)

0®5®®Y9®8 6¹@

Try it online!

-3 thanks to Emigna.

Explanation:

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.