คำโซ่สไตล์ไขว้


18

ความท้าทาย

รับรายการคำที่["Programming", "Puzzles", "Code", "Golf"]ส่งออกคำไขว้สไตล์:

      P rogramming
      ยู
      Z
      Z
  ก
C ode
  LS
  ฉ

อัลกอริทึม

  • คุณต้องดำเนินการรายการตามลำดับที่กำหนด
  • คำที่ถูกพิมพ์ในทิศทางสลับเริ่มต้นในแนวนอน
  • คำสองคำตัดกันที่ตัวอักษรตัวแรกในคำแรกซึ่งยังอยู่ในคำที่สอง หากตัวอักษรนี้เกิดขึ้นหลายครั้งในคำ seond ใช้ตัวอักษรตัวแรก

    ตัวอย่าง :
    ["no", "on"]กลายเป็น:

    o
    n o
    

    และไม่

    n o
      n
    

หมายเหตุเพิ่มเติม

  • คำที่อยู่ติดกันในรายการจะมีตัวอักษรอย่างน้อยหนึ่งตัว ["Hi", "there"]ไม่ใช่อินพุตที่ถูกต้อง
  • คำพูดจะไม่ชนกัน จะมีพื้นที่เพียงพอที่จะพิมพ์คำที่จุดตัดแรกที่เป็นไปได้เสมอ ["Hello", "there", "end", "hello"]ไม่ใช่อินพุตที่ถูกต้อง
  • การจับคู่เป็นกรณี ๆ ไป
  • คำสามารถขยายไปทางซ้ายและขึ้นไปด้านบน
  • ตัวอักษรของคำในแนวนอนต้องถูกคั่นด้วยช่องว่างหนึ่งช่อง
  • รายการอินพุตจะมีคำอย่างน้อยสองคำ
  • คำทั้งหมดจะตรงกับ regex: [A-Za-z]+
  • คุณสามารถพิมพ์ช่องว่างต่อท้ายหรือขึ้นบรรทัดใหม่ได้มากเท่าที่คุณต้องการตราบใดที่คำนั้นถูกล่ามโซ่ไว้อย่างถูกต้อง
  • ในทางกลับกันคุณไม่สามารถเพิ่มช่องว่างนำหน้าเพิ่มเติมได้ คำที่ลอยไปทางซ้ายมากที่สุดจะมีช่องว่างนำหน้าศูนย์เส้นอื่น ๆ มีช่องว่างนำหน้ามากมายที่ทุกบรรทัดขึ้นอย่างถูกต้อง
  • โปรแกรมของคุณจะต้องสามารถจัดการกับจำนวนคำโดยพลการ

กฎระเบียบ

  • อนุญาตให้ใช้ฟังก์ชั่นหรือโปรแกรมเต็มรูปแบบ
  • กฎเริ่มต้นสำหรับอินพุต / เอาต์พุต
  • ช่องโหว่มาตรฐานใช้
  • นี่คือดังนั้นจำนวนไบต์ที่น้อยที่สุดจึงชนะ Tiebreaker เป็นการส่งก่อนหน้า

กรณีทดสอบ

รายการอินพุตในบรรทัดแรกเอาต์พุตเริ่มต้นที่บรรทัดที่สอง

["สแต็ก", "แลกเปลี่ยน"]
    E
    x
    ค
    ชั่วโมง
ซ้อนกัน
    n
    ก.
    อี
["นี่", "เว็บไซต์", "จบการศึกษา", "ในที่สุด"]
    ฉ
    คือ
    n ของเขา
จบการศึกษา
    le
    ล.
    Y


Happy Coding!


ตัวอย่างที่ 2 จุดตัดแรกที่เป็นไปได้ระหว่างsiteและgraduatedคือt
edc65

@ edc65 ความอัปยศกับฉันแก้ไขมัน ขอบคุณสำหรับคำใบ้!
Denker

คำตอบ:


3

JavaScript (ES6) 253

เป็นฟังก์ชั่นที่ไม่ระบุชื่อด้วยพารามิเตอร์อาร์เรย์

z=>(z.map((w,i)=>(i&&[...p].some((c,j)=>~(k=w.search(c))?i&1?[y-=k,x+=j]:[y+=j,x-=k]:0),[p=w,x<t?t=x:x,y<u?u=y:y]),t=u=x=y=0).map(([w,x,y],i)=>{x-=t,y-=u;for(c of w)(o[y]=o[y]||[])[x]=c,i&1?y++:x++},o=[]),o.map(r=>[...r].map(x=>x||' ').join` `).join`
`)

F=z=>(z.map((w,i)=>(i&&[...p].some((c,j)=>~(k=w.search(c))?i&1?[y-=k,x+=j]:[y+=j,x-=k]:0),[p=w,x<t?t=x:x,y<u?u=y:y]),t=u=x=y=0).map(([w,x,y],i)=>{x-=t,y-=u;for(c of w)(o[y]=o[y]||[])[x]=c,i&1?y++:x++},o=[]),o.map(r=>[...r].map(x=>x||' ').join` `).join`
`)

// Less golfed
F=z=>(
  z.map( // Step 1, find intersection points and relative position
    (w,i)=>(
      i && // for each word after thw first, find position respect the previous word
      [...p].some((c,j)=> // scan prec word using .some to exit at the first intersection found
         ~(k=w.search(c)) // search current char of p inside w
         ?i&1 // calc position, odd is vertical, even is horizontal
           ?[y-=k, x+=j] // returning an array so to have a truthy value
           :[y+=j, x-=k] // returning an array so to have a truthy value
         :0 // false = not found, continue the scan
      ),
      [p=w, // set preceding word
       x<t?t=x:x, // keep trace of min x
       y<u?u=y:y  // keep trace of min y
      ] // meanwhile, return word, x and y to be used in next step 
    ), t=u=x=y=0 // initializations
  )
  .map(([w,x,y],i)=>{ // Step 2, put char into the output array
      x-=t,y-=u; // normalize position respect to min values
      for(c of w) // for each char in word, set in the output array at the right place
        (o[y]=o[y]||[])[x]=c, 
        i&1?y++:x++ // increment x or y, again odd is vertical, even is horizontal
    }, o=[] // initialization of output array
  ),
  // Step 3, add the missing spaces and newlines
  o.map(r=>[...r].map(x=>x||' ').join` `).join`\n`
)

O.textContent=F(["This", "site", "graduated", "finally"])
<pre id=O></pre>


3

ANSI C, 385 390ตัวอักษร

int N,a=1,x,y,d=1,u,k,l;int main(int c,char**v){for(;a<c;)N+=strlen(v[a++]);int H=N*2,W=N*4,m=H,n=N,q=m,w=n;char*p,F[W][H],*o;memset(F,32,W*H);for(a=1;a<c;a++){q=(x=m)<q?m:q;w=(y=n)<w?n:w;m=-1;for(p=v[a];*p;p++){F[x][y]=*p;if(m<0&&a<c-1&&(o=strchr(v[a+1],*p))){u=o-v[a+1];m=d?x:x-u*2;n=d?y-u:y;}if(d)x+=2;else y++;}d=!d;}for(l=w;l<H;l++){for(k=q;k<W;)putchar(F[k++][l]);putchar(10);}}

เรียกว่าเป็นแบบนี้: ./crossword This site graduated finally

เวอร์ชันที่ไม่ดี:

int N,a=1,x,y,d=1,u,k,l;
int main(int c, char **v) {
    for(;a<c;)
        N+=strlen(v[a++]);
    int H = N*2, W = N*4, m = H, n = N, q=m, w=n;
    char *p,F[W][H], *o;
    memset(F, 32, W*H);
    for (a=1; a < c; a++) {
        q=(x=m)<q?m:q;
        w=(y=n)<w?n:w;
        m=-1;
        for (p=v[a]; *p; p++) {
            F[x][y] = *p;
            if (m<0&&a<c-1&&(o = strchr(v[a+1], *p))) {
                u = o-v[a+1];
                m = d ? x : x-u*2;
                n = d ? y-u : y;
            }
            if (d) x+=2; else y++;
        }
        d=!d;
    }
    for (l = w; l < H; l++) {
        for (k = q; k < W;)
            putchar(F[k++][l]);
        putchar(10);
    }
}

ขอบคุณ tucuxi สำหรับเคล็ดลับ!


one char: a++)N+=strlen(v[a])=>)N+=strlen(v[a++])
tucuxi

อีก: char F[W][H],*p=>char*p,F[W][H]
tucuxi

3 ตัวอักษร: ลบ {} จากบรรทัดเดียวforแทนที่k++)putchar(F[k][l]ด้วย)putchar[k++][l]
tucuxi
โดยการใช้ไซต์ของเรา หมายความว่าคุณได้อ่านและทำความเข้าใจนโยบายคุกกี้และนโยบายความเป็นส่วนตัวของเราแล้ว
Licensed under cc by-sa 3.0 with attribution required.