Anda mungkin semua tahu tampilan 7-segmen yang dapat menampilkan antara lain semua digit dari $0\dots 9$ :

Tantangan

Kami hanya mempertimbangkan segmen $\texttt{A}\dots\texttt{G}$ , tugas Anda adalah untuk memecahkan kode satu digit mengingat segmen mana yang dihidupkan.

Ini dapat dikodekan sebagai integer 8-bit, berikut adalah tabel setiap digit dengan representasi binernya dan nilai-nilai little-endian dan big-endian yang sesuai:

$$\begin{array}{c|c|rr|rr} \text{Digit} & \texttt{.ABCDEFG} & \text{Little-endian} && \text{Big-endian} & \\ \hline 0 & \texttt{01111110} & 126 & \texttt{0x7E} & 126 & \texttt{0x7E} \\ 1 & \texttt{00110000} & 48 & \texttt{0x30} & 12 & \texttt{0x0C} \\ 2 & \texttt{01101101} & 109 & \texttt{0x6D} & 182 & \texttt{0xB6} \\ 3 & \texttt{01111001} & 121 & \texttt{0x79} & 158 & \texttt{0x9E} \\ 4 & \texttt{00110011} & 51 & \texttt{0x33} & 204 & \texttt{0xCC} \\ 5 & \texttt{01011011} & 91 & \texttt{0x5B} & 218 & \texttt{0xDA} \\ 6 & \texttt{01011111} & 95 & \texttt{0x5F} & 250 & \texttt{0xFA} \\ 7 & \texttt{01110000} & 112 & \texttt{0x70} & 14 & \texttt{0x0E} \\ 8 & \texttt{01111111} & 127 & \texttt{0x7F} & 254 & \texttt{0xFE} \\ 9 & \texttt{01111011} & 123 & \texttt{0x7B} & 222 & \texttt{0xDE} \end{array}$$

Aturan & I / O

• Input akan menjadi salah satu dari
  • bilangan bulat tunggal (seperti pada tabel di atas salah satu dari dua pesanan yang diberikan)
  • daftar / array / .. bit
  • string yang terdiri dari karakter ABCDEFG(Anda dapat menganggap itu diurutkan, sebagai contoh ABCmengkodekan $7$ ), case mereka adalah pilihan Anda (bukan case campuran)
• Output akan menjadi digit yang disandikannya
• Anda dapat menganggap tidak ada input yang tidak valid (tidak valid berarti tidak ada digit yang sesuai)

Tes

Karena tantangan ini memungkinkan banyak representasi, silakan merujuk ke tabel.

JavaScript (ES6), 26 byte

Mengambil input dalam Endian kecil.

n=>'0958634172'[n*3%77%10]

Cobalah online!

Python 3 , 18 byte

b'~0my3[_p{'.find

Cobalah online!

Menggunakan input little-endian. Berisi \x7Fbyte mentah .

Python 2 , 27 byte

map(ord,'~0my3[_p{').index

Cobalah online!

Bahasa Wolfram (Mathematica) , 41 byte

9[,6,0,8,2,3,1,7,5,4][[#~Mod~41~Mod~11]]&

Cobalah online!

Menggunakan kolom bilangan bulat kecil-endian sebagai input. Abaikan peringatan sintaksis.

Untuk input X, pertama-tama kita ambil X mod 41 dan kemudian ambil hasilnya mod 11. Hasilnya berbeda mod 11, jadi kita bisa mengekstraknya dari sebuah tabel. Misalnya, 126 mod 41 mod 11 adalah 3, jadi jika kita membuat posisi 3 sama dengan 0, maka kita mendapatkan jawaban yang benar untuk input 126.

Tabelnya adalah 9[,6,0,8,2,3,1,7,5,4]. Bagian 0 adalah kepala, yaitu 9. Bagian 1 hilang, jadi itu Null, untuk menyelamatkan byte: kita tidak perlu mengambil bagian 1. Kemudian bagian 2 adalah 6, bagian 3 adalah 0, dan seterusnya, seperti biasa.

---

Jawaban Jonathan Allan memberi kita 1[4,9,8,6,2,0,5,3,7][[384~Mod~#~Mod~13]]&. Ini tidak lebih pendek, tetapi menghindari peringatan sintaksis!

---

Bahasa Wolfram (Mathematica) , 27 25 byte

Mod[Hash[")dD}"#]+2,11]&

(Ada beberapa karakter di sini yang tidak muncul, maaf. Klik tautan di bawah dan Anda akan melihatnya.)

Cobalah online!

Ini semua tentang memaksa brute beberapa string untuk masuk ke dalam Hashsehingga hash akhirnya memiliki nilai yang tepat mod 11. Lebih memaksa brute mungkin bisa membawa kita ke solusi yang lebih pendek.

Jelly , 12 byte

“0my3[_p¶{‘i

Menerima integer little-endian.

Cobalah online!

Ini adalah implementasi yang naif, mungkin ada cara untuk mendapatkan kode terser.

Python 2 , 31 byte

lambda n:'99608231754'[n%41%11]

Cobalah online! menerima input sebagai little-endian.

Java (JDK) , 32 byte

n->"99608231754".charAt(n%41%11)

Cobalah online!

Kredit

• Pelabuhan Arnauld 's jawaban JavaScript , jauh lebih pendek daripada upaya sebelumnya dalam sejarah pos.
• -1 byte berkat Jonathan Allan , menggunakan Misha Lavrov 's Wolfram Bahasa (Mathematica) jawabannya .

JavaScript (Node.js) , 25 byte

n=>'1498620537'[384%n%13]

Menerima integer little-endian.

Cobalah online!

---

Ports untuk 31 byte dalam Python dengan lambda n:'1498620537'[384%n%13]

Spasi , 152 byte

Wajib "S, T, dan L tidak benar-benar ada, mereka hanya merupakan representasi perintah yang terlihat".

S S S T	S S L
S S S T	S T	L
S S S T	T	T	L
S S S T	L
S S S T	T	L
S S S T	S L
S S S T	S S S L
S S S L
S S S T	T	S L
S S S L
S S S T	S S T	L
S S S L
S L
S T	L
T	T	T	T	T	S S S T	S T	S S T	L
T	S T	T	S S S T	S T	T	L
T	S T	T	L
S S L
S L
S L
T	S S L
S T	L
S T	L
S S S T	L
T	S S T	L
S L
L
L
S S S L
S L
L
T	L
S T	

Cobalah online!

Berakhir dalam kesalahan.

Sintaks yang mirip perakitan:

	push 4
	push 5
	push 7
	push 1
	push 3
	push 2
	push 8
	push 0
	push 6
	push 0
	push 9
	push 0
	dup
	readi
	retrieve
	push 41
	mod
	push 11
	mod
slideLoop:
	dup
	jz .slideLoop
	slide 1
	push 1
	sub
	jmp slideLoop
.slideLoop:
	drop
	printi

brainfuck , 474 176 154 151 149 137 byte

Mengambil string input delapan 0 dan 1termasuk yang pertama 0untuk titik desimal.

(seperti pada kolom kedua dari tabel di pos)

Menghasilkan digit dari 0 hingga 9.

,>,>,>,,,>,>,>+[[->]<++<<<<<<]>[>[>[>[->[>++++++<-<]>[--<]<]>>.>>]<[>
>[>->++<<-]>-[+>++++<]>+.>]]>[>>>+<<<-]>[>>+++.>]]>[>>>[>+++<-]>-.>]

Cobalah online!

Algoritma

Dengan mengamati keadaan segmen tertentu kita dapat membagi satu set digit yang mungkin menjadi himpunan bagian yang lebih kecil. Di bawah ini adalah pohon pencarian biner statis yang digunakan dalam kode saya. Subtree kiri sesuai dengan status segmen ON, kanan sesuai dengan status segmen OFF.

                                         0,1,2,3,4,5,6,7,8,9
                                                  |    
                                         /-------[A]-------------------------\
                                 0,2,3,5,6,7,8,9                             1,4
                                        |                                     |
                         /-------------[B]----------------\             /----[G]----\
                   0,2,3,7,8,9                            5,6          4             1   
                        |                                  |
              /--------[E]--------\                  /----[E]----\    
            0,2,8                3,7,9              6             5
              |                    |
        /----[F]----\        /----[F]----\
      0,8            2      9            3,7   
       |                                  |
 /----[G]----\                      /----[G]----\
8             0                    3             7

Beberapa pengamatan bermanfaat untuk bermain golf

1. Bit C dan D berlebihan dan dapat diabaikan.
2. Leading nol (bit untuk titik desimal) dapat (ab) digunakan sebagai nilai 48, penting baik untuk mengurai input dan menyiapkan output.
3. Ketika daun tercapai dan angka dicetak, kita hanya perlu melewati semua kondisi lebih lanjut. Ini bisa dilakukan dengan memindahkan pointer data cukup jauh ke area nol sehingga tidak bisa kembali.
4. Untuk kompatibilitas, lebih baik menggunakan nol di sebelah kanan, karena beberapa implementasi BF tidak mendukung pointer data negatif.
5. Oleh karena itu lebih baik untuk menyimpan nilai output di sel paling kanan, sehingga kita dapat dengan mudah mencapai area nol di sebelah kanan.
6. Oleh karena itu lebih baik untuk memeriksa bit dari kiri ke kanan: A, B, E, F, G sehingga kita dapat mencapai sel output lebih mudah.
7. Digit yang berbeda dapat membagikan kode output. Misalnya, 5 dan 6 berada di subtree yang sama. Kami dapat melakukan +++++untuk kedua nilai dan kemudian +hanya untuk enam.
8. Kami dapat mengurangi jumlah +perintah jika kami menambahkan 2 ke nilai output terlebih dahulu. Dalam hal ini kita perlu menguranginya untuk 0dan 1hanya dan mendapatkan keuntungan untuk digit lainnya.

Retina , 96 byte

^(A)?(B)?C?(D|())(E|())(F)?(G)?
$.($.5*$.8*$(6*$7$2$2)$#6*$.3*$($.2*$(___$7)5*$7)$#4*$(6*$1_3*$8

Cobalah online! Mungkin bukan cara terbaik, tapi ini cara pemrograman yang menarik di Retina. Penjelasan:

^(A)?(B)?C?(D|())(E|())(F)?(G)?

Mencoba menangkap kasus-kasus menarik. Capture positif hanya menangkap surat itu jika ada. Karenanya panjang tangkapan adalah 1 jika ada dan 0 jika tidak ada. Kasing khusus adalah tangkapan 4 dan 6 yang hanya ada jika D atau E tidak ada. Ini hanya dapat dinyatakan dalam desimal sebagai $#4dan $#6tetapi hanya itu yang kita butuhkan di sini. Tangkapan tersebut kemudian dibangun menjadi string yang panjangnya adalah angka yang diinginkan. Sebagai contoh, jika kita menulis 6*$1maka string ini memiliki panjang 6 jika A ada dan 0 jika tidak ada. Untuk memilih antara ekspresi yang berbeda, kami menggunakan $.(untuk tangkapan positif) atau $#(untuk tangkapan negatif) yang dievaluasi menjadi 0 atau 1 dan ini kemudian dapat dikalikan dengan string sejauh ini.

$.5*$.8*$(6*$7$2$2)

Fdiulang 6 kali dan Bdua kali (oleh penggabungan karena itu golfier). Namun, hasilnya diabaikan kecuali keduanya Edan Gada. Ini menangani kasus 2, 6dan 8.

$#6*$.3*$($.2*$(___$7)5*$7)

Fdiulang 5 kali, dan jika Bada, itu ditambahkan keenam kali ditambah 3 tambahan (diwakili oleh string konstan panjang 3). Namun, hasilnya diabaikan kecuali Dada dan Etidak ada. Ini menangani kasus 3, 5dan 9.

$#4*$(6*$1_3*$8

Adiulang 6 kali, dan Gdiulang 3 kali, dan tambahan 1ditambahkan (diwakili oleh karakter konstan antara keduanya karena golfier). Namun hasilnya diabaikan kecuali Dtidak ada. Ini menangani kasus 1, 4dan 7.

$.(

Senar di atas kemudian digabungkan dan panjangnya diambil. jika tidak ada yang di atas berlaku, tidak ada string yang dihasilkan, dan panjangnya karenanya 0.

String yang dihasilkan (sebelum panjang diambil) adalah sebagai berikut:

1   _
2   BB
3   ___
4   _GGG
5   FFFFF
6   FFFFFF
7   AAAAAA_
8   FFFFFFBB
9   ___FFFFFF

MATL , 14 byte

'/lx2Z^o~z'Q&m

Input adalah angka yang mewakili segmen dalam format little-endian.

Cobalah online!

Penjelasan

'/lx2Z^o~z'  % Push this string
Q            % Add 1 to the codepoint of each char. This gives the array
             % [48 109 ... 123], corresponding to numbers 1 2 ... 9. Note that
             % 0 is missing
&m           % Implicit input. Call ismember function with second output. This
             % gives the 1-based index in the array for the input, or 0 if the
             % input is not present in the array.
             % Implicit display

Perl 5 -pl, 24 byte

$_=index'~0my3[_p{',chr

Cobalah online!

Membawa bilangan bulat little-endian.

Ruby , 29 byte

->n{"0083416243795"[n%23-10]}

Cobalah online!

Japt, 15 byte

Mengambil nilai big-endian sebagai input.

"~¶ÌÚúþÞ"bUd

Cobalah

---

Penjelasan

String berisi karakter pada masing-masing codepoint nilai big-endian; Udmendapatkan karakter di codepoint input dan bmenemukan indeks itu dalam string.

Neim , 15 byte

&bᚫJ𝕂𝕨O𝐖𝐞ℤ£ᛖ𝕪)𝕀

Penjelasan:

&bᚫJ𝕂𝕨O𝐖𝐞ℤ£ᛖ𝕪)      create list [126 48 109 121 51 91 95 112 127 123]
                 𝕀     index of

Cobalah online!

Stax , 12 byte

å╬JÄk☺é[£¿⌐→

Jalankan dan debug itu

Input adalah integer endian kecil.

Ini menggunakan konstanta string yang sama dengan solusi MATL Luis.

TI-BASIC (TI-83 + / 84 + series), 15 byte

int(10fPart(194909642ln(Ans

Menggunakan input little-endian. Hash cukup umum di TI-BASIC, jadi saya menulis fungsi hash brute-forcer untuk kasus seperti ini.

Kami mendapat sedikit keberuntungan di sini, karena pengganda 9 digit lebih panjang daripada yang diharapkan 10.

      fPart(194909642ln(Ans   hash function mapping onto [0,1)
int(10                        take first digit after decimal point

05AB1E , 17 16 15 12 byte

•NŽyf¯•I41%è

-1 byte terima kasih kepada @ErikTheOutgolfer .
-1 byte dengan membuat port jawaban Mathematica dari @MishaLavrov .
-3 byte terima kasih kepada @Grimy .

Cobalah secara online atau verifikasi semua kasus uji .

Penjelasan:

•NŽyf¯•       # Push compressed integer 99608231754
       I41%   # Push the input modulo-41
           è  # Index this into the integer (with automatic wraparound)
              # (and output the result implicitly)

Lihat ini 05AB1E ujung tambang (bagian Cara kompres bilangan bulat besar? ) Untuk memahami mengapa •NŽyf¯•adalah 99608231754.

Arang, 17 byte

Ｉ⌕”y~¶ÌÚúþÞ”℅Ｎ

Cobalah!

Port of the Japt answer .