มี "อัลกอริทึมการเรียงลำดับ" บางครั้งเรียกว่าการเรียงลำดับสตาลินเพื่อเรียงลำดับรายการคุณเพียงแค่ลบองค์ประกอบออกจากรายการจนกว่าจะเรียงลำดับตามลำดับที่เพิ่มขึ้น ตัวอย่างเช่นรายการ

[1, 2, 4, 5, 3, 6, 6]

เมื่อ "เรียง" โดยใช้การเรียงลำดับสตาลินจะกลายเป็น

[1, 2, 4, 5, 6, 6]

ทั้งสามถูกลบเพราะมันไม่เป็นระเบียบ

ตอนนี้เห็นได้ชัดว่ามีหลายวิธีในการลบองค์ประกอบเพื่อจัดเรียงรายการ ตัวอย่างเช่นรายการใด ๆ ที่มีองค์ประกอบน้อยกว่าสองรายการจะต้องเรียงลำดับดังนั้นเพียงแค่ลบองค์ประกอบมากพอที่สุ่มสี่สุ่มห้าเราสามารถเรียงลำดับรายการได้เสมอ เนื่องจากเป็นกรณีนี้เราจึงสนใจเฉพาะผลลัพธ์ที่ยาวที่สุดเท่าที่เป็นไปได้จากการเรียงลำดับของสตาลิน

งานของคุณจะใช้รายการของจำนวนเต็มบวกและส่งออกความยาวของรายการเรียงลำดับ (เพิ่มขึ้น) ที่ยาวที่สุดที่สามารถมาถึงได้โดยการเอาองค์ประกอบออกจากรายการต้นฉบับ นั่นคือความยาวของรายการย่อยที่เรียงลำดับยาวที่สุด (อาจไม่ต่อเนื่องกัน)

รายการที่เรียงลำดับสามารถมีองค์ประกอบเดียวกันมากกว่าหนึ่งครั้งในแถว คุณไม่จำเป็นต้องสนับสนุนรายการว่างเปล่าเว้นแต่ว่าโปรแกรมของคุณจะว่างเปล่า

เกณฑ์การให้คะแนน

คำตอบของคุณจะได้รับคะแนนตามความยาวของการเรียงลำดับสตาลินที่ยาวที่สุดเท่าที่จะเป็นไปได้ โปรแกรมจะถูกตีความเป็นลำดับของไบต์แทนที่จะเป็นตัวอักษรและลำดับของโปรแกรมจะเป็นแบบธรรมชาติที่เกิดขึ้นโดยการตีความจำนวนไบต์เป็นตัวเลข คะแนนต่ำกว่าดีกว่า

นี่ไม่ใช่รหัสกอล์ฟ

ต่อไปนี้เป็นเครื่องมือที่ไม่ซับซ้อนเพื่อช่วยให้คุณได้คะแนนคำตอบของคุณ

กรณีทดสอบ

[1, 2, 4, 5, 3, 6, 6] -> 6
[19, 2] -> 1
[3, 3, 4, 3] -> 3
[10] -> 1
[1, 2, 4, 9] -> 4
[1, 90, 2, 3, 4, 5] -> 5
[1, 90, 91, 2, 3, 4, 5] -> 5

Python 2ความยาว14 12 10 9

M=max;X=exit;i=input();L=[0]*M(i)
for	a	in	i:L[a-1]=M(L[:a])+1
X(M(L))

ผลลัพธ์คือรหัสทางออก

ลองออนไลน์!

มันทำงานอย่างไร

ตลอดเวลาอาร์เรย์$L$คอยติดตามชุดข้อมูลย่อยที่เรียงลำดับที่ยาวที่สุดเท่าที่เคยพบมา $L[a-1]$คือความยาวของหนึ่งที่ยาวที่สุดที่ลงท้ายด้วย$a$

เริ่มแรกเราไม่ได้ประมวลผลองค์ประกอบอาร์เรย์ดังนั้น$L$ประกอบด้วยศูนย์ทั้งหมด

เมื่อประมวลผลองค์ประกอบอาร์เรย์แรกเราใช้เวลาสูงสุดของ[ L [ 0 ] , ... , L [ - 1 ] ]ซึ่งเป็นความยาวของเรียง subarray ยาวที่สุดพบเพื่อให้ห่างไกลที่ลงท้ายด้วยหรือจำนวนเต็มขนาดเล็ก การผนวกaเข้ากับอาร์เรย์ดังกล่าวจะทำให้มันเรียงลำดับดังนั้นการเรียงลำดับย่อยที่ยาวที่สุดที่ลงท้ายด้วยaจะเป็นหนึ่งองค์ประกอบที่ยาวกว่าค่าสูงสุดนั้น เราอัปเดตL [ a - 1 ]ด้วยค่าที่คำนวณ$a$$[L[0], \dots, L[a-1]]$$a$$a$$a$$L[a-1]$

ผลสุดท้ายเป็นจำนวนสูงสุดของL$L$

ภาษา Wolfram (Mathematica)คะแนน 9

Length@*LongestOrderedSequence

ลองออนไลน์!

เยลลี่ยาว 4  2

ṢƑƇZLƲ}ŒP

ลองออนไลน์!

Bytes ในหน้ารหัสของ Jelly

183 146 144 90 76 169 125 19 80

มันทำงานอย่างไร

ṢƑƇZLƲ}ŒP  Main link. Argument: A (array)

       ŒP  Powerset; yield P, the array of all sub-arrays of A.
     Ʋ     Vier; combine the preceding four links into a monadic chain...
      }    and apply the chain to the right argument (P).
  Ƈ            Comb; only keep arrays for which the link to the left returns 1.
ṢƑ             Sort fixed; yield 1 if sorting doesn't alter the array.
   Z           Zip; read the filtered powerset by columns.
    L          Take the length.

Perl 6 , คะแนน 9

*.combinations.map({@^a*[<=] @a}).max

ลองออนไลน์!

Haskell , คะแนน8 7, 48 bytes

(l:k)%d|d>l=k%d|3>2=max(1+k%l)(k%d)
c%b=0
a=(%0)

ลองออนไลน์!

รายการย่อยที่เรียงลำดับที่ยาวที่สุดคือ

%%%%%%)

Pyth, คะแนน3 2 ( 7ไบต์)

leSI#y

บันทึกจุดขอบคุณ Anders Kaseorg
ลองที่นี่

คำอธิบาย

leSI#y
     yQ    Take the power set of the (implicit) input (preserving order).
  SI#      Get the ones that are sorted.
 e         Take the last (longest).
l          Get the length.

Staxเรียงลำดับสตาลินความยาวสูงสุด 4 รายการ

S{:^fF%|M

เรียกใช้และแก้ไขข้อบกพร่อง

มันใช้งานได้เช่นนี้

S       powerset of input
{:^f    filter by non-descending sequences
F%|M    take the maximum length remaining

R , คะแนน15 11, 72 62 ไบต์

function(L,M=max,A=1:M(L)*0){for(Y in L)A[Y]=M(A[1:Y])+1;M(A)}

ลองออนไลน์!

พอร์ตDennis 'Python ตอบกลับไปยัง R

Brachylogความยาว 2 (4 ไบต์)

⊇≤₁l

ลองออนไลน์!

คำตอบที่ประกอบขึ้นเพื่อให้กระชับโดยไม่เรียงลำดับที่สั้นกว่านั้นมากนัก

( 08 03 80 6Cในหน้ารหัสของ Brachylog)

        Output
   l    the length of
 ≤₁     a non-decreasing
⊇       sublist of
        the input.
        (maximizing the size of the sublist)