Siedziska teatralne

12

Zadanie

Teatr ma 10 rzędów, oznaczonych Ana Jod przodu do tyłu, a 15 miejsc w każdym wierszu, ponumerowanych od 1 do 15, od lewej do prawej.

Program korzysta z następujących zasad, aby wybrać najlepsze miejsca.

  • Zasada 1: Wszystkie miejsca w jednej rezerwacji muszą znajdować się w tym samym rzędzie obok siebie.
  • Zasada 2: Siedzenia muszą znajdować się jak najbliżej przodu, a następnie możliwie jak najbliżej lewej (najniższa litera, a następnie najniższa liczba)

Napisz funkcję, która przyjmuje liczbę żądanych biletów jako liczbę całkowitą ( n) i wyświetla najlepsze miejsca dostępne na liście długości n.

Twój program powinien:

  • Wyjście, -1jeśli 1> Wejście lub Wejście> 15 *
  • Dane wyjściowe, -1jeśli siedzenia nie są dostępne *
  • Mieć funkcję B(n), za pomocą której użytkownik może wprowadzić żądaną liczbę miejsc.

* Możesz wypisać -1 na liście, jeśli to ułatwi

Przykłady

I / O

Wywołanie B(5)nowej tablicy powinno oddzwonić [A1, A2, A3, A4, A5]
Wywołanie B(2)po tym powinno następnie powrócić [A6, A7]
Wywołanie B(10)po tym powinno następnie powrócić [B1, B2, ... B9, B10]
Wywołanie B(-1)powinno zawsze powrócić-1

Rozwiązanie bez golfa Python

Theatre = [ [False] * 16 ] * 11

def B(n):
    if 0 <= n <= 15:         
        for i in range(10):
            for j in range(15-n+1):
                try:
                    if not Theatre[i][j]:
                        if not Theatre[i][j + n]:
                            row = i
                            start = j
                            List = []
                            for q in range(n):
                                List.append(chr(row + 65) + str(start + q + 1))
                                Theatre[row][start + q] = True
                            return List
                except:
                    break
    return -1
Harry Beadle
źródło
1
Czy konieczne jest „Czy na stałe zapisano listę miejsc w układzie dwuwymiarowym”? Istnieje wiele sposobów, aby to zrobić bez tego; wymóg naprawdę ogranicza rozwiązania.
Justin
2
Mówisz, że tablica 2-D musi być zakodowana na stałe, ale twój przykład w Pythonie nawet jej nie koduje, używa zrozumienia, aby utworzyć nową listę w czasie wykonywania.
Tony Ellis
6
Dlaczego nawet wspomnieć o „liście miejsc w układzie dwuwymiarowym”? To brzmi jak szczegół implementacji i jeśli ktoś stworzy program, który spełnia wymagane dane wyjściowe bez użycia tablicy, nie powinno być z tym problemu.
Greg Hewgill
2
co jeśli wejście wynosi 0?
edc65
1
@ edc65 Zawsze sprawiam, że moi nieistniejący patroni kina siedzą w najlepszym miejscu teatru, w razie potrzeby na kolanach innego patrona. Nigdy tego nie zauważają.
Adam Davis

Odpowiedzi:

4

JavaScript - 172

Sama funkcja to 172:

//build persistent seats
m=[];
for(i=10;i--;){m[i]={r:String.fromCharCode(i+65),s:[]};for(j=0;j<15;j++)m[i].s.push(j+1);}

function b(z){for(i=0;i<m.length;i++)for(j=0,u=m[i].s.length;o=[],j<u;j++)if(u>=z&z>0){for(m[i].s=m[i].s.slice(z),p=m[i].s[0]||16;o[--z]=m[i].r+--p,z;);return o;}return-1;}

Wejście:

console.log(b(-1));
console.log(b(0));
console.log(b(4));
console.log(b(15));
console.log(b(1));
console.log(b(20));

Wynik:

-1
-1
[ 'A1', 'A2', 'A3', 'A4' ]
[ 'B1', 'B2', 'B3', 'B4', 'B5', 'B6', 'B7', 'B8', 'B9', 'B10', 'B11', 'B12', 'B13', 'B14', 'B15' ]
[ 'A5' ]
-1
Matt
źródło
4

JavaScript ( ES6 ) - 130 127 107 101 98

B=n=>(a=>{for(;n>0&a<9;)if((b=~~B[++a]+n)<16)for(B[a]=b;n--;)c[n]='ABCDEFGHIJ'[a]+b--})(c=[-1])||c

Demo tutaj: http://jsfiddle.net/tBu5G/

Niektóre pomysły zaczerpnięte z @ edc65

nderscore
źródło
c [B [a] = b] zamiast c [], B [a] = b jest sprytny, ale nie działa dla n = 0
edc65
@ edc65 nice catch. Teraz dostosowałem go do obsługi sprawyn=0
nderscore
Niesamowite. To coś, o czym należy pamiętać, aby uniknąć „powrotu” - dzięki za udostępnienie (+1)
edc65
@ edc65 dzięki! Myślałem, że to interesujące. MT0 ma nas oboje pokonać! : P
nderscore
3

Haskell, 129

t=[[a:show s|s<-[1..15]]|a<-['A'..'J']]
b n=(n%).span((<n).length)
_%(h,[])=([],h)
n%(j,(r:s))=let(t,u)=splitAt n r in(t,j++u:s)

Trzeba było wprowadzić pewne poprawki, aby funkcja ta działała w Haskell: bzwraca parę: bilety (jeśli to możliwe) i nowy stan teatru. tjest początkowym stanem teatru, z niesprzedanymi wszystkimi biletami Również zwrot -1był nienaturalny dla Haskell, więc jeśli nie można wystawić biletów na żądanie, pusta lista jest zwracana dla biletów.

λ: let (k1,t1) = b 5 t
λ: k1
["A1","A2","A3","A4","A5"]

λ: let (k2,t2) = b 2 t1
λ: k2
["A6","A7"]

λ: let (k3,t3) = b 10 t2
λ: k3
["B1","B2","B3","B4","B5","B6","B7","B8","B9","B10"]

λ: let (k4,t4) = b (-1) t3
λ: k4
[]

λ: let (k5,t5) = b 2 t4
λ: k5
["A8","A9"]
MtnViewMark
źródło
3

APL (75)

T←10 15⍴0⋄B←{(⍵∊⍳15)∧∨/Z←,T⍷⍨⍵/0:+T[P]←{⎕A[⍺],⍕⍵}/¨P←(⊃Z/,⍳⍴T)∘+¨1-⍨⍳1⍵⋄¯1}

Test:

      B 5
  A1    A2    A3    A4    A5  
      B 2
  A6    A7  
      B 10
  B1    B2    B3    B4    B5    B6    B7    B8    B9    B10  
      B ¯1
¯1
      B 3
  A8    A9    A10  

Wyjaśnienie:

  • T←10 15⍴0: Tto matryca 15 na 10, która utrzymuje stan teatru (0 = wolny)
  • B←{... }: funkcja
    • (⍵∊⍳15): jeśli należy do zbioru liczb całkowitych od 1 do 15,
    • ∨/Z←,T⍷⍨⍵/0: i Tzawiera zera z rzędu (przechowujące możliwe punkty początkowe w Z),
    • :: następnie:
      • (⊃Z/,⍳⍴T): wybierz możliwe współrzędne początkowe i weź pierwszą,
      • ∘+¨1-⍨⍳1⍵: dodaj ⍵-1więcej pozycji po prawej stronie współrzędnej początkowej
      • P←: zapisz współrzędne w P
      • {⎕A[⍺],⍕⍵}/¨: sformatuj współrzędne
      • T[P]←: przechowuj sformatowane współrzędne w ich miejscach w T. (zrobią to wszystkie niezerowe wartości w T)
      • +: zwraca wynik, którym są sformatowane współrzędne (domyślnie wynik przypisania jest domyślny)
    • ⋄¯1: w przeciwnym razie powróć ¯1.
marinus
źródło
3

JavaScript (E6) 99 103 113 121

Naprawdę musisz zapisać liczbę dla każdego wiersza

B=n=>{for(r=i=[-1];n>0&i++<9;)if((a=~~B[i]+n)<16)for(B[i]=a;n--;)r[n]='ABCDEFGHIJ'[i]+a--;return r}

Test

'5:'+B(5)+'\n2:'+B(2)+'\n10:'+B(10)+'\n0:'+B(0)+'\n1:'+B(-1))+'\n3:'+B(3)

Nie golfił

B = n => {
  for (r = i = [-1]; n > 0 & i++ < 9;)
    if ((a = ~~B[i] + n) < 16)
      for (B[i] = a; n--; ) r[n] = 'ABCDEFGHIJ'[i] + a--;
  return r;
}
edc65
źródło
3

JavaScript (wersja robocza ECMAScript 6) - 96 95 91 znaków

Rozwiązanie rekurencyjne:

Wersja 1

B=(n,r=0)=>n>0&&(k=~~B[r])+n<16?[...Array(n)].map(_=>'ABCDEFGHIJ'[r]+(B[r]=++k)):r<9?B(n,r+1):-1

Wersja 2:

B=(n,r=0)=>n<1|r>9?-1:(k=B[r]|0)+n<16?[...Array(n)].map(_=>'ABCDEFGHIJ'[r]+(B[r]=++k)):B(n,r+1)

(Dzięki nderscore za inspirację do zapisania 1 postaci)

Wersja 3:

B=(n,r=0)=>n<1|r>9?-1:(B[r]^=0)+n<16?[...Array(n)].map(_=>'ABCDEFGHIJ'[r]+ ++B[r]):B(n,r+1)

(Dzięki nderscore )

Wyjaśnienie:

B = function(n,r=0)          // Create a function B with arguments:
                             // - n is the number of seats to book
                             // - r is the row number (defaults to 0)
{
  var k = ~~B[r];            // get the number of seats already booked in row r
  if (  n > 0                // ensure that n is a valid booking
     && k+n<16 )             // check that there are enough seats remaining in row r
  {
    var P = new Array(n);    // Create an array with length n with no elements initialised
    var Q = [...P];          // Use P to create an array with every element
                             // initialised to undefined
    var R = 'ABCDEFGHIJ'[r]; // get the row ID.
    B[r] = k + n;            // Increment the number of seats booked in row r by n.
    var S = Q.map(
      function(){
        return R + (++k);    // Map each value of Q to the row ID concatenated with
                             // the seat number.
      }
    );
    return S;                // Return the array of seats.
  }
  else if ( r < 9 )          // If there are more rows to check
  {
    return B(n,r+1);         // Check the next row.
  }
  else                       // Else (if n is invalid or we've run out of rows)
  {
    return -1;               // Return -1.
  }
}
MT0
źródło
Niezłe rozwiązanie. Pracowałem nad czymś podobnym. Oto -1 bajt:B=(n,r=0)=>n>0&r<9?(k=B[r]|0)+n<16?[...Array(n)].map(_=>'ABCDEFGHIJ'[r]+(B[r]=++k)):B(n,r+1):-1
nderscore
Dzięki, niestety, to nie działa, ponieważ nie można zarezerwować wiersza J, ale negowanie pierwszego czeku, który B=(n,r=0)=>n<1|r>9?-1:(k=B[r]|0)+n<16?[...Array(n)].map(_=>'ABCDEFGHIJ'[r]+(B[r]=++k)):B(n,r+1)należy podać, powinno zadziałać.
MT0
Ach, dobry chwyt.
nderscore
I wciąż B=(n,r=0)=>n<1|r>9?-1:(B[r]^=0)+n<16?[...Array(n)].map(_=>'ABCDEFGHIJ'[r]+ ++B[r]):B(n,r+1)
spada
2

GolfScript, 103 82 bajtów

226,1>15/[0]*:T{:&0>{T[{),&~)>:|T\/,2=}?]{T|-:T;|{(.[15/65+]\15%)`+}%}-1if}-1if}:B

Przykłady

$ cat theatre.gs
226,1>15/[0]*:T
{:&0>{T[{),&~)>:|T\/,2=}?]{T|-:T;|{(.[15/65+]\15%)`+}%}-1if}-1if}:B

5  B p  # Execute B(5), stringify and print.
2  B p
15 B p
17 B p
0  B p

{}:puts # Disable automatic output.
$
$ golfscript theatre.gs
["A1" "A2" "A3" "A4" "A5"]
["A6" "A7"]
["B1" "B2" "B3" "B4" "B5" "B6" "B7" "B8" "B9" "B10" "B11" "B12" "B13" "B14" "B15"]
-1
-1

Jak to działa

226,1>           # Push the array [ 1 … 225 ].
15/[0]*          # Split in chunks of 15 elements and join separating by zeros.
:T               # Save result in T.
{                #
  :&0>           # Save the function's argument in & and check if it's positive.
  {              # If it is:
    T[{          # For each seat S in T:
      ),         # Push [ 0 … S ].
      &~)>       # Reduce two [ S-(&-1) … S ].
      :|         # Save the result in |.
      T\/        # Split T around |.
      ,2=        # If there are two chunks, the seats are available.
    }?]          # Find the first S that satisfies the above condition.
    {            # If there was a match:
      T|-:T;     # Remove the seats in | from T.
      |{         # For each seat S in |:
        (.       # Push S+1 S+1.
        [15/65+] # Compute (S+1)/15+65; the ASCII character corresponding to the row.
        \15%)`+  # Compute (S+1)%15+1, stringify and concatenate. 
      }%         #
    }            #
    -1if         # If there was no match, push -1 instead.
  }              #
  -1if           # If the argument was non-positive, push -1 instead.
}
Dennis
źródło
1

CoffeeScript - 171 150 149

Podejrzewam, że Ruby lub Perl niedługo to pokonają.

c=0;l=64;k=1
f=(n)->
 if n<0 or n>15 or 150-c<n
  return-1
 a=[]
 for i in[1..n]
  if c%15==0
   ++l;k=1
  ++c;a.push String.fromCharCode(l)+k;++k
 a

Odpowiednik JavaScript / Objaśnienie :

Dla osób niezaznajomionych z CoffeeScript.

var seats  = 0; //Occupied seats.
var letter = 64; //ASCII code for row letter.
var index  = 1;  //Index of seat in row.

function seats( count )
{
    if( count < 0 || count > 15 || ( 150 - seats ) < count )
        return -1;

    var assignedSeats = [];

    for( var i = 1; i <= count; ++i )
    {
        if( ( seats % 15 ) === 0 )
        {
            ++letter;
            index = 1;
        }

        ++seats; //Occupy a seat.
        assignedSeats.push( String.fromCharCode( letter ) + index );
        ++index;
    }

    return assignedSeats;
}

Wypróbuj online .

Tony Ellis
źródło
1
To rozwiązanie nie spełnia regułyAll seats in one booking must be in the same row, next to each other.
nderscore
0

Kobra - 309

To powinno to zrobić, ale tak naprawdę nie mogę dostać się do kompilatora przez kilka godzin, więc w razie potrzeby zaktualizuję go później.

class P
    var s=List<of List<of String>>()
    def main
        for l in 'ABCDEFGHIJ'
            t=[]
            for n in 1:16,t.insert(0,l.toString+n.toString)
            .s.add(t)
    def b(n) as List<of String>
        t=[]
        for r in .s.count,if .s[r].count>=n
            for i in n,t.add(.s[r].pop)
            break
        return if(n>0 and t<>[],t,['-1'])
Obrzydliwe
źródło
0

C # - 289

Pierwsza próba gry w golfa kodowego.

int[]s=new int[10];string[]B(int n){string[]x=new string[]{"-1"};if(n<1||n>15)return x;int m=(int)Math.Pow(2, n)-1;for(int i=0;i<10;++i){for(int j=0;j<15-n;++j){if((s[i] &m)==0){s[i]|=m;string[]r=new string[n];for(int k=0;k<n;++k)r[k]=(""+(char)(i+65)+(j+k+1));return r;}m<<=1;}}return x;}

Nie grał w golfa

int[] s = new int[10];
string[] B(int n)
{
    string[] x = new string[] { "-1" };
    if (n < 1 || n > 15) return x;
    int m = (int)Math.Pow(2, n) - 1;
    for (int i = 0; i < 10; ++i)
    {
        for (int j = 0; j < 15 - n; ++j)
        {
            if ((s[i] & m) == 0)
            {
                s[i] |= m;
                string[] r = new string[n];
                for (int k = 0; k < n; ++k)
                    r[k] = ("" + (char)(i + 65) + (j+k+1));
                return r;
            }
            m <<= 1;
        }
    }
    return x;
}
złoty Smok
źródło
0

K, 140

d:10#,15#0b
B:{if[(x<0)|x>15;:-1];$[^r:*&&/'~:^a:{(*&&/'{x(!1+(#x)-y)+\:!y}[d x;y])+!y}[;x]'!#d;-1;[.[`d;(r;a r);~:];(10#.Q.A)[r],/:$1+a r]]}

Niewątpliwie należy wprowadzić tutaj wiele ulepszeń

tartin
źródło
0

C ++ - 257

Również pierwsza próba gry w golfa.

static vector< int > t (10, 0);

vector<string> b(int n){
    vector<string> o;
    int i=0,j;
    for(;i<10&&16>n&&n>0;i++){
        if(15-t[i]<n) continue;
        char l='A'+i;
        for(j=t[i];j<n+t[i];j++){
           o.push_back(l + toS(j + 1));
        }
        t[i]+=n;
        n=0;
    }
    if(o.empty()) o.push_back("-1");
    return o;
}

Ponieważ to_string nie działało z moim kompilatorem, toS jest zdefiniowane jako

string toS(int i){
    return static_cast<ostringstream*>( &(ostringstream() << i) )->str();
}

I jako mały interfejs

int main(){
int input = 0;
bool done = false;
while (!done){
    cout << "how many seats would you like? (0 to exit)\n";
    cin >> input;
    vector<string> selection = b(input);
    for (auto s : selection){
        cout << s << ' ';
    }
    cout << endl;
    if (input == 0) break;
}
return 0;
}
celie56
źródło
1
Usunięcie niepotrzebnych białych znaków sprowadza go do 243 znaków.
tomsmeding
Więcej gry w golfa do 236:vector<int> t(10,0);vector<string> b(int n){vector<string> o;for(int i=0,j;i<10&&16>n&&n>0;i++){if(15-t[i]<n)continue;char l='A'+i;for(j=0;j<n;j++)o.push_back(l+to_string(j+t[i]+1));t[i]+=n;n=0;}if(o.empty())o.push_back("-1");return o;}
Tomsmeding
0

C # - 268 bajtów

Kod do gry w golfa:

int[]s=new int[10];string[]B(int n){string[]x={"-1"};if(n<1||n>15)return x;int m=(int)Math.Pow(2,n)-1;for(int i=0;++i<10;){for(int j=0;++j<15-n;){if((s[i]&m)==0){s[i]|=m;var r=new string[n];for(int k=0;++k<n;)r[k]=(""+(char)(i+65)+(j+k+1));return r;}m<<=1;}}return x;}

Nieskluczony kod:

    int[] s = new int[10];
    string[] B(int n)
    {
        string[] x = { "-1" };
        if (n < 1 || n > 15) return x;
        int m = (int)Math.Pow(2, n) - 1;
        for (int i = 0; ++i < 10;)
        {
            for (int j = 0; ++j < 15 - n;)
            {
                if ((s[i] & m) == 0)
                {
                    s[i] |= m;
                    var r = new string[n];
                    for (int k = 0; ++k < n;)
                        r[k] = ("" + (char)(i + 65) + (j + k + 1));
                    return r;
                }
                m <<= 1;
            }
        }
        return x;
    }

Napisałbym kilka adnotacji w komentarzu do rozwiązania GoldenDragon, zamiast tworzyć własne, ale moja reputacja na to nie pozwala.

tsavinho
źródło