Woher rufen sie an?

19

Bei Auslandsgesprächen wird den Telefonnummern ein Code vorangestellt, der angibt, in welchem ​​Land sich die Nummer befindet. Diese Codes sind Präfixcodes , dh, kein Code ist ein Präfix eines anderen.

Sie haben heute früher einen Anruf verpasst und sind irgendwie neugierig, woher dieser Anruf gekommen sein könnte. Sie möchten also die Vorwahl nachschlagen. Da es sich jedoch um einen Präfix-Code handelt, sind Sie sich nicht sicher, wo er endet. Schreiben Sie daher ein Programm, um den aufrufenden Code vom Rest der Nummer zu trennen.

Eingang

Als Eingabe erhalten Sie eine Zeichenfolge, die aus den Ziffern besteht 0-9. Die ersten Ziffern sind eine der unten aufgeführten Ländervorwahlen (dies bedeutet, dass die erste Ziffer niemals verwendet wird 0). Nach der Ländervorwahl enthält der Rest der Eingabe null oder mehr Ziffern in beliebiger Reihenfolge. Es wird nicht garantiert, dass es sich um eine gültige Telefonnummer handelt. Ihr Programm muss Eingaben mit mindestens 15 Stellen verarbeiten können

Ausgabe

Ihr Programm sollte die eindeutige Ländervorwahl ausgeben, die ein Präfix der Nummer ist. Die gültigen Ausgaben lauten wie folgt:

1
20
211
212
213
216
218
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
260
261
262
263
264
265
266
267
268
269
27
290
291
297
298
299
30
31
32
33
34
350
351
352
353
354
355
356
357
358
359
36
370
371
372
373
374
375
376
377
378
379
380
381
382
383
385
386
387
389
39
40
41
420
421
423
43
44
45
46
47
48
49
500
501
502
503
504
505
506
507
508
509
51
52
53
54
55
56
57
58
590
591
592
593
594
595
596
597
598
5993
5994
5997
5999
60
61
62
63
64
65
66
670
672
673
674
675
676
677
678
679
680
681
682
683
685
686
687
688
689
690
691
692
7
800
808
81
82
84
850
852
853
855
856
86
870
875
876
877
878
879
880
881
882
883
886
888
90
91
92
93
94
95
960
961
962
963
964
965
966
967
968
970
971
972
973
974
975
976
977
979
98
991
992
993
994
995
996
998

Diese Liste basiert auf den genannten Codes auf Wikipedias Liste der Ländervorwahlen Seite als Überarbeitungs 915410826, mit einigen Änderungen

  • Alle Codes, die als nicht zugewiesen oder eingestellt aufgeführt sind, und einige Codes, die als für die zukünftige Verwendung reserviert aufgeführt sind, wurden weggelassen
  • Wenn ein auf Wikipedia gelisteter Code ein Präfix eines anderen ist, wurde letzterer weggelassen
  • Wenn ein einzelnes Land oder Gebiet mehr als einen Code haben würde und diese Codes ein gemeinsames Präfix haben würden, werden diese Codes zugunsten ihres gemeinsamen Präfixes weggelassen.

Dies kann dazu führen, dass unabhängige Länder zusammengelegt werden oder umstrittene Gebiete mit einem bestimmten Antragsteller zusammengelegt werden. Dies ist keine politische Äußerung, und Entscheidungen über die Einbeziehung oder Unterlassung von Gebieten und Staaten wurden auf der Grundlage der Kodizes getroffen, nicht aufgrund meiner Überzeugungen über das Eigentum oder die Souveränität der Unternehmen, die diese verwenden.

Bei einer Eingabe, die nicht mit einem dieser Codes beginnt, ist das Verhalten Ihres Programms undefiniert.

Und schlussendlich:

Testfälle

input -> output
5292649259 -> 52
3264296721 -> 32
1550 -> 1
33121394 -> 33
7 -> 7
2542112543 -> 254
2005992972 -> 20
350 -> 350
360 -> 36
8505234469 -> 850
9795586334 -> 979
148985513598795 -> 1
222222 -> 222
5999995 -> 5999
code-golf string kolmogorov-complexity subsequence Sara J
quelle
Vielleicht sollten Sie input | outputstattdessen eine Strichlinie darunter setzen, es sei denn, Sie möchten inputübersetzt werden output.
JL2210,

Antworten:

10

JavaScript (ES6),  75 73  71 Bytes

1 Byte dank @Shaggy
gespeichert 2 Byte dank @Neil gespeichert

s=>/1|7|(2[^07]|3[578]|42|599?|50|6[789]|8[0578]|9[679]|.)./.exec(s)[0]

Probieren Sie es online!

Arnauld
quelle
Ich denke 599?|50kann ersetzen 599|5[09].
Neil,
@ Neil In der Tat. Vielen Dank!
Arnauld,
Funktioniert das s=>/(2[^07]|3[578]|42|599?|50|6[789]|8[0578]|9[679]|[^17]|)./.exec(s)[0]für 72 Bytes?
Ovs
1
@ovs Tut es, aber die aktuelle Version ist tatsächlich 71 Bytes - die Byteanzahl war veraltet.
Arnauld
9

05AB1E , 28 25 24 Bytes

η•A󾫸tEΓ∞ζ∊u½d•.¥¤ØªKн

Probieren Sie es online!

η                            # prefixes of the input
 •A󾫸tEΓ∞ζ∊u½d•            # compressed integer 211112166111113621489811655218129
                 .¥          # undelta: [0, 2, 3, 4, 5, 6, 8, 9, 15, 21, 22, 23, 24, 25, 26, 29, 35, 37, 38, 42, 50, 59, 67, 68, 69, 75, 80, 85, 87, 88, 96, 97, 99, 108]
                   ¤         # last element of that list: 108
                    Ø        # nth prime: 599
                     ª       # append it to the list
                      K      # remove all those values from the list of prefixes
                       н     # get the first prefix left
Grimmig
quelle
6

Retina 0.8.2 , 60 Bytes

!`^(2[1-69]?|3[578]?|42?|599?|50?|6[789]?|8[578]?|9[679]?)?.

Probieren Sie es online!

Neil
quelle
Ihre Eingabe in der TIO enthält bereits die Antwort;) Ich weiß, dass Ihr Code sie nicht verwendet, aber es sieht ein bisschen verwirrend aus, tbh.
Kevin Cruijssen
4

Python 3 , 120 78 Bytes

f=lambda n:{n//10+3}-{*b'	 &()-5>FGHSXZ[cdf',602}and f(n//10)or n

Probieren Sie es online!

Enthält einige nicht druckbare Elemente: 

00000000: 663d 6c61 6d62 6461 206e 3a7b 6e2f 2f31  f=lambda n:{n//1
00000010: 302b 337d 2d7b 2a62 2705 0306 0708 090b  0+3}-{*b'.......
00000020: 0c18 191a 1b1c 1d20 2628 292d 353e 4647  ....... &()-5>FG
00000030: 4853 585a 5b63 6466 272c 3630 327d 616e  HSXZ[cdf',602}an
00000040: 6420 6628 6e2f 2f31 3029 6f72 206e       d f(n//10)or n

Etwas ungolfed (frühere) Version:

f=lambda n:{n/10}-{0,2,3,4,5,6,8,9,21,22,23,24,25,26,29,35,37,38,42,50,59,599,67,68,69,80,85,87,88,96,97,99}and f(n/10)or n

Probieren Sie es online!

ovs
quelle
4

Bash , 328 341 410 Bytes

Nicht sehr konkurrenzfähig für eine Golf-Punktzahl, aber jede davon hilft meinen Schlagfähigkeiten!

Einsparung von 13 Byte durch Eliminierung der Verarbeitung von 2-Byte-Lauflängenwerten; Das Speichern von nur 3 Bytes fügt 8 Bytes zu T hinzu, vereinfacht jedoch die case-Anweisung erheblich.

Einsparung von 69 Bytes durch Änderung des Ansatzes von der Bash-Erweiterung zum Speichern von Deltas. Der vorherige TIO-Link steht am Ende meiner Antwort.

T='16D73r423112r62r72r6F1224r53-03511322rZr32r9L1611-01Fr9BrD2112V12-025r9-029r8-0202rB2r7-0308-162121E5r832-02082r72Cr52-3UR132'
A(){
V=$[V+36#$1]
S="$S $V"
}
R(){
read -n$1 d
}
while read -n1 c;do
case $c in -)R 3;A $d;;r)R 1;for((i=1;$i<=36#$d;i++)){ A 1;};;*)A $c;;esac;done<<<$T
for s in $S;do [[ $1 =~ ^$s ]]&&echo $s;done

Probieren Sie es online!

  • Die Liste der Präfixe wurde numerisch sortiert
  • T ist eine "Art" von lauflängencodierter Zeichenfolge, die das Delta vom vorherigen Wert zeigt. Jedes Zeichen ist eines der folgenden:
    • Ein base36-Wert, der den Anstieg gegenüber dem vorherigen Wert angibt
    • 'r': Gibt an, dass das nächste Zeichen die base36-codierte Anzahl von Delta-Wiederholungswerten von 1 angibt.
    • '-': zeigt an, dass die nächsten 3 Zeichen der nächste Deltawert sind

Die Zeichenfolge T = "16D73r42 [...] -3UR132", die den obigen Regeln folgt, wird zu einer Liste von Deltas: "1 6 D 7 3 r4 2 [...] 4995 1 3 2"

Könnte 2-3 weitere Bytes einsparen, wenn ein höherer Radix als 36 verwendet wird (wie 62-64), aber Excel unterstützt nur nativ bis zu 36, und genau das hat die Liste der Deltas und deren Konvertierungen durchgeführt.

  • Während der Ausführung wird T analysiert und in die Zeichenfolge S erweitert, die für den Vergleich der im Befehlszeilenargument 1 angegebenen Telefonnummer verwendet wird.

Das Erweitern von T, S wird zu: "1 7 20 27 30 31 32 33 34 36 [...] 5993 5994 5997 5999"

Probieren Sie es online!

spuckte
quelle
2

Perl 5 (-p), 44 Bytes

$\=chop until/^599$/+vec"\x7D\x03\xE0\x27\x68\x04\x04\x08\x38\x00\xA1\x01\x0B",$_,1

Probieren Sie es online!

Sowohl TIO als auch SO haben Probleme mit nicht druckbaren Zeichen, daher wird das Programm mit Escape-Sequenzen angezeigt. Hier ist ein Hexdump der tatsächlichen 44 Bytes:

0000000: 245c 3d63 686f 7020 756e 7469 6c2f 5e35  $\=chop until/^5
0000010: 3939 242f 2b76 6563 227d 03e0 2768 0404  99$/+vec"}..'h..
0000020: 0838 00a1 010b 222c 245f 2c31            .8....",$_,1
Grimmig
quelle
1

PHP , 219 Bytes

Ich habe das Gefühl, dass es viel Raum gibt, um den Regex zu verbessern - ich habe es so weit wie möglich ausprobiert, aber ich wette, es kann viel kürzer sein ...

preg_match('/(1|7|2(0|1[12368]|[2346].|5[^9]|7|9[01789])|3[578]?.|42?[013]|5([1-8]|0.|99?[3479])|6([0-6]|7[^1]|8[^4]|9[012])|8(0[08]|[1246]|5[02356]|7[05-9]|8[0-368])|9([0-58]|6[^9]|7[^8]|9[1-8]))/',$argn,$r);echo$r[0];

Probieren Sie es online!

XMark
quelle
1

Java 8, 84 Bytes

s->s.replaceAll("(1|7|(2[^07]|3[578]|42|599?|50|6[789]|8[0578]|9[679]|.).).*","$1");

Port von @Arnauld 's JavaScript-Regex , also stelle sicher, dass du ihn unterstützt!

Probieren Sie es online aus.

Erläuterung:

s->                    // Method with String as both parameter and return-type
  s.replaceAll("(1|7|(2[^07]|3[578]|42|599?|50|6[789]|8[0578]|9[679]|.).).*",
                       //  Replace this regex-match
               "$1");  //  With this replacement

Regex Erklärung:

(1|7|(2[^07]|3[578]|42|599?|50|6[789]|8[0578]|9[679]|.).).*  // MATCH:
 1                                                           //  a 1
  |7                                                         //  or a 7
    |(                                                )      //  or:
      2[^07]                                                 //   a 2 not followed 0 nor 7
            |3[578]                                          //   or a 3 followed by 5, 7, or 8
                   |42                                       //   or a 42
                      |599?                                  //   or a 59 or a 599
                           |50                               //   or a 50
                              |6[789]                        //   or a 6 followed by 7, 8, or 9
                                     |8[0578]                //   or an 8 followed by 0, 5, 7, or 8
                                             |9[679]         //   or a 9 followed by 6, 7, or 9
                                                    |.       //   or any single digit
                                                       .     //  followed by any single digit
(                                                       )    //  All captured in capture group 1
                                                         .*  //  With 0 or more digits following

$1                                                           // REPLACEMENT:
$1                                                           //  The match of capture group 1,
                                                             //  (effectively removing the
                                                             //   remaining digits of `.*`)
Kevin Cruijssen
quelle
0

Scala , 411 402 330 Bytes

Dies setzt voraus, dass das Argument nur Ziffern enthält.

"(1|(2(0|(1[12368])|([2346]\\d)|(5[^9])|7|(9[^2-6])))|(3(([0-4])|([57]\\d)|6|(8[^48])|9))|(4([^2]|(2[013])))|(5((0\\d)|[^09]|(9([^9]|(9[3479])))))|(6([0-6]|(7[^1])|(8[^4])|(9[0-2])))|7|(8((0[08])|[1246]|(5[02356])|(7[05-9])|(8[^4579])))|(9([0-58]|(6[^9])|(7[^8])|(9[^079]))))(.*)".r.unapplySeq(args(0)).foreach(l=>println(l.head))

Probieren Sie es online!

jkeatley
quelle