ในการท้าทายนี้คุณจะเขียนโปรแกรมที่รับสตริงที่คั่นด้วยสองบรรทัดใหม่คือ s1 (บรรทัดแรก) และ s2 (บรรทัดที่สอง) เป็นอินพุต (STDIN หรือใกล้เคียงที่สุด) คุณสามารถสันนิษฐานได้ว่าความยาวของ s1 นั้นจะเล็กกว่า 30 และใหญ่กว่าความยาวของ s2 เสมอ โปรแกรมควรแสดงผลแต่ละขั้นตอนในระยะทางของ levenshtein จาก s1 ถึง s2

เพื่ออธิบายความหมายของแต่ละขั้นตอนในระยะทางของ levenshtein โปรแกรมจะพิมพ์สตริง n โดยที่ n คือระยะทาง levenshtein ระหว่าง s1 และ s2 และระยะทาง levenshtein ระหว่างสองสายที่อยู่ติดกันจะเป็นหนึ่งเสมอ ลำดับไม่สำคัญ เอาต์พุตควรคั่นด้วยบรรทัดใหม่และไม่รวม s1 เฉพาะ in-betweens และ s2 โปรแกรมควรทำงานภายในหนึ่งนาทีบนคอมพิวเตอร์ที่ทันสมัย

ตัวอย่าง:

การป้อนข้อมูล:

Programming
Codegolf

เอาท์พุท:

rogramming
Cogramming
Coramming
Coamming
Codmming
Codeming
Codeging
Codegong
Codegolg
Codegolf

การป้อนข้อมูล:

Questions
Answers

เอาท์พุท:

uestions
Aestions
Anstions
Ansions
Answons
Answens
Answers

การป้อนข้อมูล:

Offline
Online

เอาท์พุท:

Ofline
Online

การป้อนข้อมูล:

Saturday
Sunday

เอาท์พุท:

Sturday
Surday
Sunday

นี่คือลิงค์ไปยังสคริปต์ python ที่พิมพ์ระยะทางและขั้นตอนต่างๆ

กฎเพิ่มเติม:

• ไม่มีการใช้อินเทอร์เน็ต
• ช่องโหว่มาตรฐานใช้

นี่คือรหัสกอล์ฟเพื่อให้คุณเข้าใจรหัสสั้น รหัสที่สั้นที่สุดชนะ!

javascript, 167 161 154 ไบต์

function l(a,b,d){if(a!=b){if(a[l="length"]>b[l])a=a[s="slice"](1),d=-1;else if(a[d]!=b[d])a=a[s](0,d)+b[d]+a[s](d+1);document.write(a+"<p>");l(a,b,++d)}}

โทรไปด้วย l("Programming","golf")

Codepen

รหัส degolfed (และใส่คำอธิบายประกอบ) (ล้าสมัย แต่คุณได้รับแนวคิด):

function l(a, b, d) {
  s = "substring"; //saving this to a string lets us call it with a[s] later
  if (a != b) { //if the strings aren't the same, continue
    if (a.length > b.length) { //if a is still greater than b we can delete characters
      a = a[s](1); //delete the first character from a
      d = -1 //when we start swapping characters, we'll need d to start at 0
    } else if (a[d] != b[d]) { //if the d'th character isn't the same, we can swap them
      a = a[s](0, d) + b[d] + a[s](d + 1) //swap the d'th character of b into a
    }
    document.write(a + "<p>"); //the first call to document.write overwrites the page but successive calls append the output 
    l(a, b, ++d) //increment d and recurse
  }
}

Haskell, 201 194 ไบต์

l=length
g[]n u=map(\_->"")n
g(b:c)[]u=(u++c):g c[]u
g(b:c)n@(o:p)u|b==o=g c p(u++[o])|1<2=((u++o:c):g c p(u++[o]))!((u++c):g c n u)
a!b|l a<l b=a|1<2=b
p[a,n]=g a n""
f=interact$unlines.p.lines

นานกว่าที่คาด บางทีฉันอาจตีกอล์ฟลงเล็กน้อย ...

ตัวอย่างการใช้งาน:

*Main> f                     -- call via f
Questions                    -- User input
Answers                      -- no newline after second line!
uestions                     -- Output starts here
Aestions
Anstions
Ansions
Answons
Answens
Answers

มันเป็นสัตว์เดรัจฉานที่ตัดสินใจเลือกระหว่างการเปลี่ยนแปลงและการลบหากอักขระเริ่มต้นแตกต่างกัน