Każdorazowo rozdajesz karty oznaczone od 0 do 9 kartami, tworząc stosy, które zaczynają się od 0 i liczą 1.
- Kiedy rozdajesz 0, umieszczasz je na stole, aby rozpocząć nowy stos.
- Kiedy rozdajesz dowolną inną kartę, układasz ją na karcie, która ma dokładnie jedną wartość niższą, pokrywając ją. Jeśli nie ma takiej karty, talii nie można układać w stosy.
Biorąc pod uwagę talię, określ, czy można ją kłaść w stosie w podanej kolejności. Odpowiednio, biorąc pod uwagę listę cyfr, zdecyduj, czy można ją podzielić na rozłączne podsekwencje każdej formy0,1,..,k
Przykład
Weź pokład 0012312425
. Pierwsze dwie karty są 0
, więc idą na stół:
Stacks: 00
Deck: 12312425
Następnie zajmujemy się 1
, co dalej 0
, nie ma znaczenia, które:
1
Stacks: 00
Deck: 2312425
Następnie układamy na 2
szczycie właśnie umieszczonego 1
i 3
na wierzchu.
3
2
1
Stacks: 00
Deck: 12425
Następnie 1
, 2
i umieszczony na szczycie pierwszego stosu i 4
na szczycie drugiej.
4
3
22
11
Stacks: 00
Deck: 25
Teraz musimy umieścić 2
, ale nie ma 1
żadnego stosu. Tak więc tej talii nie można było ustawiać jeden na drugim.
Dane wejściowe: niepusta lista cyfr 0–9 lub ich ciąg. Nie możesz założyć, że 0 zawsze będzie na wejściu.
Dane wyjściowe : Jedna z dwóch wyraźnych spójnych wartości, jedna dla sekwencji, które można ustawiać jedna na drugiej, a druga dla sekwencji, których nie można ustawiać jedna na drugiej
Przypadki testowe:
Możliwość ustawiania w stos:
0
01
01234
00011122234567890
012031
0120304511627328390
Nie można ustawiać jeden na drugim:
1
021
0001111
0012312425
012301210
000112223
Dla wygody, jak listy:
[0]
[0, 1]
[0, 1, 2, 3, 4]
[0, 0, 0, 1, 1, 1, 2, 2, 2, 3, 4, 5, 6, 7, 8, 9, 0]
[0, 1, 2, 0, 3, 1]
[0, 1, 2, 0, 3, 0, 4, 5, 1, 1, 6, 2, 7, 3, 2, 8, 3, 9, 0]
[1]
[0, 2, 1]
[0, 0, 0, 1, 1, 1, 1]
[0, 0, 1, 2, 3, 1, 2, 4, 2, 5]
[0, 1, 2, 3, 0, 1, 2, 1, 0]
[0, 0, 0, 1, 1, 2, 2, 2, 3]
Zgrupowane:
[[0], [0, 1], [0, 1, 2, 3, 4], [0, 0, 0, 1, 1, 1, 2, 2, 2, 3], [0, 1, 2, 0, 3, 1], [0, 1, 2, 0, 3, 0, 4, 5, 1, 1, 6, 2, 7, 3, 2, 8, 3, 9, 0]]
[[1], [0, 2, 1], [0, 0, 0, 1, 1, 1, 1], [0, 0, 1, 2, 3, 1, 2, 4, 2, 5]]
Tabela liderów:
var QUESTION_ID=144201,OVERRIDE_USER=20260;function answersUrl(e){return"https://api.stackexchange.com/2.2/questions/144201/answers?page="+e+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+ANSWER_FILTER}function commentUrl(e,s){return"https://api.stackexchange.com/2.2/answers/"+s.join(";")+"/comments?page="+e+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+COMMENT_FILTER}function getAnswers(){jQuery.ajax({url:answersUrl(answer_page++),method:"get",dataType:"jsonp",crossDomain:!0,success:function(e){answers.push.apply(answers,e.items),answers_hash=[],answer_ids=[],e.items.forEach(function(e){e.comments=[];var s=+e.share_link.match(/\d+/);answer_ids.push(s),answers_hash[s]=e}),e.has_more||(more_answers=!1),comment_page=1,getComments()}})}function getComments(){jQuery.ajax({url:commentUrl(comment_page++,answer_ids),method:"get",dataType:"jsonp",crossDomain:!0,success:function(e){e.items.forEach(function(e){e.owner.user_id===OVERRIDE_USER&&answers_hash[e.post_id].comments.push(e)}),e.has_more?getComments():more_answers?getAnswers():process()}})}function getAuthorName(e){return e.owner.display_name}function process(){var e=[];answers.forEach(function(s){var r=s.body;s.comments.forEach(function(e){OVERRIDE_REG.test(e.body)&&(r="<h1>"+e.body.replace(OVERRIDE_REG,"")+"</h1>")});var a=r.match(SCORE_REG);a&&e.push({user:getAuthorName(s),size:+a[2],language:a[1],link:s.share_link})}),e.sort(function(e,s){var r=e.size,a=s.size;return r-a});var s={},r=1,a=null,n=1;e.forEach(function(e){e.size!=a&&(n=r),a=e.size,++r;var t=jQuery("#answer-template").html();t=t.replace("{{PLACE}}",n+".").replace("{{NAME}}",e.user).replace("{{LANGUAGE}}",e.language).replace("{{SIZE}}",e.size).replace("{{LINK}}",e.link),t=jQuery(t),jQuery("#answers").append(t);var o=e.language;/<a/.test(o)&&(o=jQuery(o).text()),s[o]=s[o]||{lang:e.language,user:e.user,size:e.size,link:e.link}});var t=[];for(var o in s)s.hasOwnProperty(o)&&t.push(s[o]);t.sort(function(e,s){return e.lang>s.lang?1:e.lang<s.lang?-1:0});for(var c=0;c<t.length;++c){var i=jQuery("#language-template").html(),o=t[c];i=i.replace("{{LANGUAGE}}",o.lang).replace("{{NAME}}",o.user).replace("{{SIZE}}",o.size).replace("{{LINK}}",o.link),i=jQuery(i),jQuery("#languages").append(i)}}var ANSWER_FILTER="!t)IWYnsLAZle2tQ3KqrVveCRJfxcRLe",COMMENT_FILTER="!)Q2B_A2kjfAiU78X(md6BoYk",answers=[],answers_hash,answer_ids,answer_page=1,more_answers=!0,comment_page;getAnswers();var SCORE_REG=/<h\d>\s*([^\n,]*[^\s,]),.*?(\d+)(?=[^\n\d<>]*(?:<(?:s>[^\n<>]*<\/s>|[^\n<>]+>)[^\n\d<>]*)*<\/h\d>)/,OVERRIDE_REG=/^Override\s*header:\s*/i;
body{text-align:left!important}#answer-list,#language-list{padding:10px;width:290px;float:left}table thead{font-weight:700}table td{padding:5px}
<script src="https://ajax.googleapis.com/ajax/libs/jquery/2.1.1/jquery.min.js"></script> <link rel="stylesheet" type="text/css" href="//cdn.sstatic.net/codegolf/all.css?v=83c949450c8b"> <div id="answer-list"> <h2>Leaderboard</h2> <table class="answer-list"> <thead> <tr><td></td><td>Author</td><td>Language</td><td>Size</td></tr></thead> <tbody id="answers"> </tbody> </table> </div><div id="language-list"> <h2>Winners by Language</h2> <table class="language-list"> <thead> <tr><td>Language</td><td>User</td><td>Score</td></tr></thead> <tbody id="languages"> </tbody> </table> </div><table style="display: none"> <tbody id="answer-template"> <tr><td>{{PLACE}}</td><td>{{NAME}}</td><td>{{LANGUAGE}}</td><td>{{SIZE}}</td><td><a href="{{LINK}}">Link</a></td></tr></tbody> </table> <table style="display: none"> <tbody id="language-template"> <tr><td>{{LANGUAGE}}</td><td>{{NAME}}</td><td>{{SIZE}}</td><td><a href="{{LINK}}">Link</a></td></tr></tbody> </table>
int a[99]
w C1
do10
Odpowiedzi:
Python 2 ,
4543 bajtów-2 bajty dzięki @TFeld
Wypróbuj online!
źródło
Haskell , 55 bajtów
Anonimowa funkcja pobierająca listę liczb całkowitych i zwracająca a
Bool
.Zastosowanie:
(all(<1).foldr(?)[]) [0,1,2,3,4]
.Wypróbuj online!
Jak to działa
foldr(?)[]
zwija swój argument listy od prawej do lewej za pomocą?
, zaczynając od pustej listy. Wynikiem jest lista liczb na liście, które nie pasowały do poprzedniej liczby.all(<1)
sprawdza, czy jedynymi liczbami, które nie pasują do poprzedniej liczby, są zera.m?l
dodaje liczbęm
do listyl
niepasujących numerów. Jeślim+1
jest już na liście, można go teraz usunąć, ponieważ pasuje do niegom
.(p,r)<-span(/=m+1)l
dzieli listęl
na dwie częścip
ir
przy pierwszym wystąpieniu liczbym+1
. Jeśli nie ma, odpowiednia częśćr
będzie pusta.m:p++drop 1r
przygotowujem
się do podzielonych części. Jeślir
jest niepusty, to musi zaczynać się odm+1
, który jest usuwany przezdrop 1
.źródło
?
rekurencyjnie, ale uzyskałem tę samą długość .Data.List.delete
Łuska , 9 bajtów
Wypróbuj online!
Zwroty
1
za talie, które można ustawiać jeden na drugim, i0
za talie, których nie można układać jeden na drugim.Wygląda na to, że Ørjan Johansen w swojej odpowiedzi Haskella wymyślił już ten sam algorytm, ale w Husk jest to oczywiście o wiele bardziej zwięzłe.
Wyjaśnienie
Problem przejmujemy z innej strony: odwróć pokład i ułóż stosy w dół. Jeśli po przejściu przez całą talię wszystkie stosy mają 0 na górze, talię można układać w stosy.
źródło
Galaretka ,
1511 bajtówWypróbuj online!
źródło
‘Ṭ€+\I>0FṀ
zawsze działałoby?C (gcc),
7473 bajtyWymaga tablicy wejściowej do oznaczenia końca -1. Przykładowe użycie:
źródło
return r
?Siatkówka , 42 bajty
Wypróbuj online!
Wyjaśnienie
To porządkuje cyfry, stabilnie, według częstotliwości występowania tej samej cyfry wcześniej. W efekcie zestawia to różne potencjalne podsekwencje razem. Wynikowy ciąg znaków będzie miał najpierw pierwsze wystąpienie każdej cyfry, a następnie drugie wystąpienie każdej cyfry i tak dalej. W przypadku danych wejściowych, które można ustawiać jeden na drugim, wynik będzie wyglądał
0123...0123...0123...
mniej więcej tak , że każdy z tych podciągów może zakończyć się w dowolnym momencie.Najłatwiej jest ustalić, czy na wejściu występuje tego rodzaju wzorzec jednoargumentowy.
Zamieniamy każda cyfra n przez n
1
s, a po nim przecinek aby oddzielić poszczególne cyfry.Wreszcie wykorzystujemy referencję do przodu, aby dopasować kolejno rosnące liczby cyfr. Próbujemy dopasować cały ciąg albo przez dopasowanie pojedynczego przecinka (reprezentującego 0 , co rozpoczyna nowy przebieg) lub przez dopasowanie poprzedniej rzeczy poprzedzonej dodatkowym
1
, co działa tylko wtedy, gdy bieżąca cyfra jest następcą poprzedniej.źródło
TI-Basic (seria 83), 25 bajtów (49 znaków)
Jak to działa
Pobiera dane wejściowe jako listę w
Ans
. Wyjścia1
dla danych wejściowych, które można ustawiać jeden na drugim, w0
przeciwnym razie.Dla każdego
I
,cumSum(Ans=I)
wylicza listę tego, ile razyI
wystąpiła w każdym początkowego segmentu, więcmin(cumSum(Ans=I)≤cumSum(Ans=I-1))
jest tylko 1, jeżeli w każdej pozycji, widzieliśmyI-1
co najmniej tyle razy, ileI
. Ogólne wyrażenie występuje,1
gdy dotyczy to każdego z nichI
.źródło
JavaScript (ES6),
614540 bajtówPobiera dane wejściowe jako listę.
Przypadki testowe
Pokaż fragment kodu
W jaki sposób?
Dla każdej wartości 0 ... 9 śledzimy liczbę dostępnych stosów z poprzednią kartą na szczycie. Liczniki te są przechowywane w [-9] na [0] , gdzie [] jest oryginalną tablicą wejściową. Jedynym licznikiem, który koliduje z danymi wejściowymi, jest [0] , ale tak naprawdę nie przejmujemy się tym, ponieważ 1) karty oznaczone jako 0 są zawsze dozwolone i muszą być przetwarzane osobno i 2) wartość wejściowa a [0 ] jest przetwarzany, zanim będzie można go zaktualizować.
źródło
MATL , 16 bajtów
Dane wejściowe to tablica liczb.
Kod wysyła
1
w STDOUT, jeśli dane wejściowe można ustawiać jeden na drugim, lub kończy się z błędem, a puste wyjście w STDOUT, jeśli dane wejściowe nie mogą być ustawiane w stosy.Wypróbuj online!
źródło
Siatkówka , 110 bajtów
Wypróbuj online! Link zawiera przypadki testowe. Często nie używam
$16
...źródło
Mathematica, 80 bajtów
źródło
Python 2 ,
6961554746 bajtówWypróbuj online!
Dane wyjściowe to
error
/no error
.źródło
R , 88 bajtów
Wypróbuj online!
Funkcja, która przyjmuje wektor R; zwraca
TRUE
za sztaplowanie iFALSE
dla sztaplowania.Wyjaśnienie:
źródło
Nim, 133 bajty
1
Jeśli działa;0
jeśli nie.Musiałem wyciągnąć trochę funky, żeby poradzić sobie ze zmiennością zmiennych w pętlach forów, no cóż.
źródło
Haskell ,
7775 bajtówWypróbuj online! Zastosowanie:
g.reverse $ [0,1,2]
. ZwracaTrue
dla wejściowych elementów iFalse
inne.Jest to rozwiązanie rekurencyjne, które przegląda daną listę od tyłu do przodu. Realizuje to obserwację
r
i ostatnim elementemx
można ustawiać jeden na drugim, jeślir
można go ustawiać jeden na drugim, albox
zero, albo obax-1
pojawiają się w,r
ar
pox-1
usunięciu można również ustawiać jeden na drugim.źródło
Java 8,
168150142 bajtówZwroty
0
/1
czy można prawidłowo ustawiać w stosy, czy nie.Wyjaśnienie:
Wypróbuj tutaj.
źródło
C, 248 bajtów
Uwaga: Aby wydrukować status zwrotu, wpisz „echo $ status” w terminalu
Status powrotu 0: Nie można ustawiać jeden na drugim
Status zwrotu 1: Można ustawiać jeden na drugim
Objaśnienie: Zwiększa element tablicy o indeksie odpowiadającym najbardziej bieżącej cyfrze na stosie. Następnie program sprawdza, czy ten właśnie zwiększony element tablicy jest większy niż element poprzedzający go. Jeśli tak, zwraca 0. W przeciwnym razie, jeśli program dotrze do końca tablicy, zwraca 1.
źródło
Galaretka , 15 bajtów
Monadyczny link pobierający listę nieujemnych liczb całkowitych i zwracający,
0
jeśli można je układać w stosy lub1
jeśli nie można ich układać w stosy.Wypróbuj online!
W jaki sposób?
źródło
Japt , 16 bajtów
Przetestuj online! Wyjścia
false
do układania w stosy,true
do układania w stosy.Wyjaśnienie
źródło
05AB1E , 25 bajtów
Wyzwanie nie wygląda wcale na takie trudne, ale jest dość trudne w 05AB1E (przynajmniej dla mnie ..)
Wyjścia
0
jeśli można je ustawiać jeden na drugim, a1
jeśli nie można ich ustawiać jeden na drugim.Wypróbuj online lub sprawdź wszystkie przypadki testowe .
Wyjaśnienie:
źródło
Java 8, 87 bajtów
Zamiast budować stosy, po prostu obliczam, czy elementu nie można ustawiać w stosy na poprzednich elementach, i zwracam 0, gdy napotkasz element, którego nie można ustawiać w stosy. Jeśli dojdę do końca, cały ciąg można ustawiać jeden na drugim, a 1 jest zwracany:
Wypróbuj online!
Wyjaśnienie:
źródło