Ini adalah tantangan golf kode yang cukup sederhana. Program Anda, diberi string ASCII, adalah untuk mengurai string itu menjadi dua string, yang akan dievaluasi. Jika string kedua "kemudian" dari yang pertama, itu akan mengembalikan 1, jika "lebih awal" dari yang pertama, itu akan mengembalikan -1, dan jika mereka sama, itu akan mengembalikan 0. Ke mengklarifikasi apa yang dimaksud "nanti" dan "sebelumnya", mari kita lihat kode karakter ASCII. Anda perlu membandingkan setiap karakter string, memperlakukan masing-masing sebagai digit angka. Kemudian mengacu pada jumlah yang lebih besar, terjadi setelah jumlah yang lebih kecil. String akan diformat dengan karakter tanda hubung untuk memisahkan dua kelompok input.

Lihatlah contoh ini:

7-9sebagai input harus kembali 1.

7mengkonversi ke kode ASCII 55, dan 9mengkonversi ke kode ASCII 57.

Seperti yang 57terjadi secara numerik setelah 55, 9lebih dari 7.

Contoh lain:

LKzb-LKaj sebagai input harus kembali -1

Urutan kode ASCII untuk ini adalah 76-75-122-98dan76-75-97-106

Ini adalah tantangan kode golf, dan jumlah byte adalah bagaimana entri akan dinilai.

Setiap input dari 95 karakter ASCII yang dapat dicetak diterima, tidak termasuk spasi, dan tanda hubung untuk apa pun selain memisahkan input. Selain itu, string tidak dijamin memiliki panjang yang sama.

Semoga berhasil!

EDIT: Agar lebih jelas, setiap karakter harus diperlakukan seperti angka dalam angka. Dalam contoh LKzb-LKaj, meskipun jlebih lama dari b, zlebih lambat dari a, dan karena ini adalah digit yang lebih signifikan, ia harus diutamakan. String yang disediakan akan selalu minimal 3 karakter, menghilangkan string kosong dari ruang lingkup masalah ini.

EDIT: Berikut adalah beberapa kasus uji lagi, untuk bantuan Anda:

• A-9 -> -1
• 11-Z -> -1
• 3h~J*-3h~J* -> 0
• Xv-Y0 -> 1

Pyth - 11 byte

Mudah, gunakan ._tanda untuk mendapatkan tanda dan Cuntuk mendapatkan kode char.

._-F_CMcz\-

Cobalah online di sini .

Suite uji .

._               Sign of number
 -F              Fold subtraction (this finds difference of a tuple)
  _              Reverse list to get correct order of operands when subtracting
   CM            Map char, already treats strings as digits of base256 number
    c \-         Split by "-"
     z           Input

CJam, 12 byte

l'-/esfb~\-g

Cobalah online di penerjemah CJam .

Bagaimana itu bekerja

l   e# Read a line from STDIN.
'-/ e# Split it at spaces.
es  e# Push the current time (milliseconds since epoch).
fb  e# Consider each string as digits in base huge-number.
~\  e# Dump the results and reverse their order.
-g  e# Subtract and apply sign function.

Jawa, 86 118

int f(String...s){return(int)Math.signum((s=s[0].split("-"))[1].compareTo(s[0])*(s[0].length()==s[1].length()?1:-1));}  

Cara yang sangat aneh untuk membandingkan string. Membuat perbaikan cepat sehingga melewati test case tambahan, akan mencari golfiness lebih banyak nanti

Terima kasih kepada Vartan dalam komentar untuk signumsarannya

Perl, 31 byte

#!/usr/bin/perl -p
/-/;$_=($`.$'^$`)cmp($'.$`^$')

30 byte + 1 byte untuk -p. Menerima input pada STDIN.

Penjelasan

Ketika operan cmpmemiliki panjang yang berbeda, suka chickendan egg, mereka disejajarkan seperti ini:

c  h  i  c  k  e  n
e  g  g  \0 \0 \0 \0

sehingga egg> chicken( \0adalah byte nol). Tapi kami ingin mereka disejajarkan seperti ini:

c  h  i  c  k  e  n
\0 \0 \0 \0 e  g  g

jadi itu chicken> egg.

Untuk melakukan ini, kami menggabungkan mereka, sekali dengan chickensebelumnya eggdan sekali dengan eggsebelumnya chicken:

c  h  i  c  k  e  n  e  g  g
e  g  g  c  h  i  c  k  e  n

Sekarang setelah dua string kami memiliki panjang yang sama, kami menghapus kata utama menggunakan XOR untuk mendapatkan:

\0 \0 \0 \0 \0 \0 \0 e  g  g
\0 \0 \0 c  h  i  c  k  e  n

Dan sekarang kita dapat menggunakan cmpuntuk menemukan yang lebih dulu. (Di sana, saya mengatakannya!)

Python 2, 88 karakter

a=raw_input().split('-');print-cmp(*(map(ord,s.rjust(max(map(len,a)),'\0'))for s in a))

cmptidak melakukan hal yang benar ketika Anda memiliki dua string panjang yang berbeda, jadi saya harus mengisi keduanya dengan karakter nol (yang orddikonversi ke 0) untuk menangani kasus itu. Sayangnya, itu menambahkan sekitar 35 karakter, ditambah itu sekarang dua baris, bukan satu karena saya membutuhkan panjang input dan untuk beralih di atasnya.

R, 54 Bytes

Ini membutuhkan perpustakaan pracma. Ini membagi string input pada -. Benar membenarkan string. Beri peringkat mereka dan lakukan diff.

Jadi untuk 11-7 kita berakhir dengan string "11" dan "7". Peringkat ini adalah [2, 1]. Perbedaannya adalah -1. Untuk 3h ~ J * -3h ~ J * kita mendapatkan "3h ~ J *" dan "3h ~ J *". Peringkat ini adalah [1.5, 1.5] dengan perbedaan 0.

diff(rank(pracma::strjust(scan(,'',sep='-'),"right")))

Contoh Uji

> diff(rank(pracma::strjust(scan(,'',sep='-'),"right")))
1: LKzb-LKaj
3: 
Read 2 items
[1] -1
> diff(rank(pracma::strjust(scan(,'',sep='-'),"right")))
1: A-9
3: 
Read 2 items
[1] -1
> diff(rank(pracma::strjust(scan(,'',sep='-'),"right")))
1: 11-Z
3: 
Read 2 items
[1] -1
> diff(rank(pracma::strjust(scan(,'',sep='-'),"right")))
1: 3h~J*-3h~J*
3: 
Read 2 items
[1] 0
> diff(rank(pracma::strjust(scan(,'',sep='-'),"right")))
1: Xv-Y0
3: 
Read 2 items
[1] 1

CoffeeScript, 143 140 139

f=(s)->[a,b]=((t=s.split '-').map (y)->Array((m=Math.max) 1, 1+(m ((l=(c)->c.length) t[0]),l t[1])-l y).join('\u0000')+y);`b<a?-1:(b>a?1:0)`

Ini adalah jsfiddle dengan hasilnya (lihat di konsol)

PERL, 46 36 Bytes

print$2cmp$1if"@ARGV"=~/(\S+)-(\S+)/

Mengonversi daftar argv menjadi string, membelah oleh tanda hubung menjadi arg sisi kiri dan kanan, tidak ada spasi arg, lalu mengembalikan panggilan cmp.

Python 3, 84 byte

x,y=[int.from_bytes(i.encode(),"big")for i in input().split("-")];print((x<y)-(y<x))

Pisahkan input string dengan "-". Ubah string unicode menjadi string bytes, lalu tafsirkan string byte ini sebagai bilangan bulat big-endian. Akhirnya lakukan perbandingan - (un) untungnya cmptidak lagi tersedia di Python 3.

Python 2, 69 byte

print -cmp(*[int(i.encode("hex"),16)for i in raw_input().split("-")]) 

Python 2, 79 byte

Solusi yang cukup sederhana, dan mudah dimengerti. Bandingkan panjang string, lalu bandingkan string secara leksigrafis.

Coba di sini

s,t=raw_input().split('-')
x,y=len(s),len(t)
print(x<y)*2-1if x-y else cmp(t,s)

perl5, 64

perl -aF- -pe '@f=map{length}@F;$_=$f[1]<=>$f[0]||$F[1]cmp$F[0]'

Jalankan saja dari commandline. meskipun akan terlihat lebih baik dengan baris baru tetapi harganya 1 char.

perl -laF- -pe '@f=map{length}@F;$_=$f[1]<=>$f[0]||$F[1]cmp$F[0]'

Versi yang lebih panjang ini menangani panjang yang tidak cocok dengan benar.

F #, 53

fun s->let[|a;b|]=s="";s.Split[|'-'|]in b.CompareTo a

Ini dalam bentuk fungsi anonim (lambda), jadi Anda harus menempelkannya dan memberikan parameter langsung setelahnya adalah (atau, menggunakan notasi perpipaan). Misalnya (dalam FSI):

> "7-9" |> fun s->let[|a;b|]=s="";s.Split[|'-'|]in b.CompareTo a
1
> "abc-abc" |> fun s->let[|a;b|]=s="";s.Split[|'-'|]in b.CompareTo a
0
> "LKzb-LKaj" |> fun s->let[|a;b|]=s="";s.Split[|'-'|]in b.CompareTo a
-1

JavaScript ES6, 46 43 byte

f=s=>((a=s.split('-'))[1]>a[0])-(a[1]<a[0])

Ruby, 59 byte

a,b=gets.chomp.split ?-
p (b.size<=>a.size).nonzero?||b<=>a

05AB1E , 12 11 9 byte

'-¡₄ö¥0.S

Cobalah secara online atau verifikasi semua kasus uji .

Penjelasan:

'-¡          # Split the (implicit) input on '-'
             #  i.e. 'LKzb-LKaj' → ['LKzb','LKaj']
   ₄ö        # Convert both parts to a Base-1000 number
             #  i.e. ['LKzb','LKaj'] → [21020061037,21020036045]
     ¥       # Push the deltas (subtraction between each sub sequential pair) of the list
             #  i.e. [21020061037,21020036045] → [-24992]
      0.S    # Get the sign [1 for a>0; -1 for a<0; 0 for a==0] (and output implicitly)
             #  i.e. [-24992] → [-1]