Sen "BINGO" kaçak ilan ve ödüllerini almak için muzaffer bir şekilde yürüyen diğer oyuncular bıktınız. Bu sefer farklı olacak. Arayan kişiye, BINGO çağrılarını çağrılacak sırayla önceden vermesi için rüşvet verdiniz . Şimdi, bu aramalar için mümkün olduğunca erken kazanacak ve size bir kazanç (veya olası bir kravat) garanti eden bir BINGO panosu oluşturmanız yeterlidir.

Sınırlı bir dize veya sıralı çağrı listesi verildiğinde, tipik BINGO biçiminde (harfler dahil, örn. B9Veya G68daha fazla bilgi için kurallara bakın), bu çağrılar için en uygun BINGO kartını temsil eden bir matris veya 2B liste çıkarın. Girdinin her zaman geçerli olacağını varsayın.

BINGO Kuralları:

• 5x5 tahta
• "BINGO", kartınızda şu ana kadar aranan numaralardan arka arkaya 5 rakam olduğunda gösterilir.
• Orta kare ücretsizdir (otomatik olarak bir BINGO'ya sayılır) ve boşluk, boş bir liste -1veya ile temsil edilebilir 0.
• 5 sütun harfleri ile gösterilir B, I, N, G, O, sırasıyla.
• İlk sütun 1-15, ikinci 16-30, ... ve beşinci 61-75 sayılarını içerebilir.
• Giriş için alınan harfler ve sayılar isteğe bağlı olarak (a ,veya boşluk gibi anlamlı bir şeyle) sınırlandırılabilir veya bir karakter ve sayı kümesi olarak alınabilir.
• Çıktı, matristeki her yerde yalnızca sayı gerektirir.
• Erken BINGO'nuza katkıda bulunmayacak kareler geçerli olmalı, ancak optimal olması gerekmez.
• Bu kod golf, en kısa kod kazanır

Örnekler:

Bu girdi biçimini örnekler için kullanıyorum, çünkü daha kısa. Kabul edilebilir giriş / çıkış formatları için yukarıdaki bölüme bakın.

O61 B2 N36 G47 I16 N35 I21 O64 G48 O73 I30 N33 I17 N43 G46 O72 I19 O71 B14 B7 G50 B1 I22 B8 N40 B13 B6 N37 O70 G55 G58 G52 B3 B4 N34 I28 I29 O65 B11 G51 I23 G56 G59 I27 I25 G54 O66 N45 O67 O75 N42 O62 N31 N38 N41 G57 N39 B9 G60 I20 N32 B15 O63 N44 B10 I26 O68 G53 I18 B12 O69 G49 B5 O74 I24

Possible Output (this has a horizontal BINGO in 3rd row. A diagonal is also possible.): 
[[11,25,42,53,68], 
 [ 6,22,32,57,62],
 [ 2,16, 0,47,61],
 [ 3,17,37,59,75],
 [ 9,19,41,46,70]]

N42 N34 O66 N40 B6 O65 O63 N41 B3 G54 N45 I16 O67 N31 I28 B2 B14 G51 N36 N33 I23 B11 I17 I27 N44 I24 O75 N38 G50 G58 B12 O62 I18 B5 O74 G60 I26 B8 I22 N35 B1 B4 G53 O73 G52 O68 B10 O70 I30 G59 N43 N39 B9 G46 G55 O64 O61 I29 G56 G48 G49 I19 G57 N37 O72 I25 N32 B13 B7 B15 O71 I21 I20 O69 G47

Must be a vertical BINGO in 3rd (N) column (because 4 N's came before one of each B,I,G,O):
[[11,25,42,53,63], 
 [ 2,22,34,57,65],
 [ 6,16, 0,47,66],
 [ 3,17,41,54,75],
 [ 9,19,40,46,70]]

Mathematica, 302 bayt

(b=Prepend;i=1;n=15#&@@#-15+Range@5&;g=#~b~{N,0};o={#2,#3,#,##4}&@@#&;While[(l=Length@Union[t=(k=Take)[#&@@@g,i]])<5&&Max[#2&@@@Tally@t]<5,i++];If[l<5,m=#&@@Commonest@t;If[m===#,o[g~k~i/.{m,x_}->x/.{_,_}->Nothing],n@#2]&,o@DeleteDuplicates@b[n@#2,<|#->#2&@@@Reverse@g|>@#]~k~5&]~MapIndexed~{B,I,N,G,O})&

Bağımsız değişken olarak, sıralı çiftlerin bir listesini alan adsız işlev, {{N,42},{N,34},{O,66},{N,40},...}(her bir sıralı çiftteki ilk öğenin bir dize değil, çıplak bir sembol olduğunu unutmayın) ve alt listelerin sütunları temsil ettiği (tam olmayan bir 2B tam sayı listesi döndürme) bingo tahtası).

İlk test senaryosu için çıktı:

{{1,3,2,4,5},{17,18,16,19,20},{31,32,0,33,34},{46,48,47,49,50},{62,63,61,64,65}}

Genel olarak, B / I / G / O satırlarının her birinde çağrılan bir sayı nedeniyle mümkün olan en erken tombala oluştuğunda, bu sayılar orta sırada olacaktır; her sütun aksi takdirde mümkün olan en küçük dört sayıyı içerecektir (önceden kullanılmış sayıyı dikkate alarak). Örneğin, ilk test durumu, çağrılan ikinci sayı B12yerine B2olacak şekilde değiştirilirse, çıkış kartının ilk sütunu olur {1,2,12,3,4}.

İkinci test senaryosu için çıktı:

{{1,2,3,4,5},{16,17,18,19,20},{42,34,0,40,41},{46,47,48,49,50},{61,62,63,64,65}}

Genel olarak, mümkün olan en erken tombala, tek bir sütunda çağrılan beş sayıdan (veya N sütununda çağrılan dört sayıdan) oluştuğunda, kalan dört sütun sırayla mümkün olan en küçük beş sayısını içerir.

İkinci test durumu den değiştirilirse {{N,42},{N,34},{O,66},{N,40},...}için {{O,72},{O,74},{O,66},{N,40},...}(sadece ilk iki giriş değiştirildi), çıkıştan:

{{1,2,3,4,5},{16,17,18,19,20},{31,32,33,34,35},{46,47,48,49,50},{74,66,72,65,63}}

Biraz çözülmemiş versiyon:

(b=Prepend;i=1;n=15First[#]-15+Range[5]&;g=b[#,{N,0}];o={#2,#3,#,##4}&@@#&;
While[
    (l=Length[Union[t=(k=Take)[Apply[#&,g,{1}],i]]])<5
  &&
    Max[Apply[#2&,Tally[t],{1}]]<5,
  i++];
MapIndexed[
  If[l<5,
    m=First[Commonest[t]];If[m===#,o[k[g,i]/.{m,x_}->x/.{_,_}->Nothing],n[#2]]&,
    k[
      o[DeleteDuplicates[b[n[#2],Association[Apply[#->#2&,Reverse[g],{1}]][#]]]]
    ,5]&
  ],{B,I,N,G,O}
])&

İlk satır çoğunlukla kodu kısaltmak için yapılan tanımlardır, ancak tombala bulmayı basitleştirmek için gorta kareyi {N,0}girdiye ekler . ( nİşlev, #th sütunundaki 1 dizinli en küçük beş yasal bingo sayısını verir . oİşlev 5 demet alır ve ilk öğeyi üçüncü olacak şekilde taşır.)

WhileHatlar 2-6 döngü bingo içeren girdi küçük başlangıç bölümünü bulur. (Üçüncü satır, her sütunda bir tane bingos için test ederken, beşinci satır tek sütunlu bingos için test eder).

Herhangi bir işlev için F, operatör MapIndexed[F,{B,I,N,G,O}](7. satırdan başlayarak) 5 demet üretir {F{B,1},F{I,2},F{N,3},F{G,4},F{O,5}}(iyi, teknik olarak {F{B,{1}},...}); bir fonksiyon uyguluyoruzFiki argümanından bir bingo-board sütunu oluşturan uyguluyoruz. Ancak bu işlev, hangi tip bingo bulunduğuna bağlıdır: tek sütunlu bir tombala sahip olduğumuzda 8. satır doğrudur, bu durumda işlev (9. satır) bingo sütunundaki ilgili giriş numaralarını ve diğer sütunlar. Diğer durumda, işlev (satır 10-12) her bir sütunun ortasındaki ilgili giriş numaralarını ve başka bir yerde varsayılan sayıları kullanır.

JavaScript (ES6) 372 Bayt

Muhtemelen biraz golf olabilir, ama nasıl görmüyorum. Öneriler çok takdir edilir;)

A=a=>[1,2,3,4,5].map(x=>x+15*a),F=a=>{b=[[],[],[i=0],[],[]],a.replace(/[^0-9 ]/g,"").split` `.some(x=>{b[--x/15|(c=0)].push(++x);return b.some((x,i)=>(d=x.length)>4||d==1&i-2&&++c>3)});for(e=[A(0),A(1),A(2),A(3),A(4)];i<5;a=b[i][0],b[i][0]=b[i][2],b[i++][2]=a)for(j=0;j<5&b[i].length<5;j++)b[i][j]<i*15+5?e[i].splice(e[i].indexOf(b[i][j]),1):b[i][j]=e[i].shift();return b}