Враховуючи вхідний рядок завдовжки 2або більше, що складається виключно з алфавітних символів, [A-Z]або [a-z](на ваш вибір, якщо вони є великими або малими літерами), виведіть суцільний рядок символів, утворюючи подвійний алмазний візерунок.

Рядок введення починається з центральної лінії і простягається вниз-вправо по діагоналі, поки не буде досягнуто кінця введення рядка. Потім шаблон продовжується вгору-вправо по діагоналі, поки ви не знаходитесь вище центральної лінії, ніж довжина вхідного рядка мінус 1. Продовжуйте вниз-вправо назад до центральної лінії, потім вниз-і- вліво, потім вліво-вліво (йде «позаду» центрального символу) і, нарешті, вниз-вліво назад до початкового символу.

Це трохи висловлюється, і це краще продемонструвати на деяких прикладах:

"YOU"
  U   Y
 Y O U O
Y   O   U
 O Y U Y
  U   O

  ^   ^
 ↙ ↖ ↗ ↘
↘   ↗   >
 ↘ ↗ ↖ ↙
  V   V

Подивіться, як YOUпочинаються в центральній лінії та слідують вниз-вправо, потім вгору-вправо тощо, доки вона не закінчиться на початку. Особливо зверніть увагу на те, як Yна верхній і лівій частині знаходиться "позаду" Oі, отже, не показано.

Ще кілька прикладів:

"HI"
 I I
H H H
 I I

"TEST"
   E     E
  S T   T S
 T   T T   T
T     S     T
 E   E E   E
  S T   T S
   T     T

"HELLO"
    L       L
   O L     E L
  H   E   H   O
 E     H O     H
H       L       E
 E     L L     L
  L   E   L   L
   L H     E O
    O       H

• Введення та вихід можуть бути надані будь-яким зручним методом .
• Гарантоване введення має бути не менше двох літер (тобто ви ніколи не отримаєте ""як введення).
• Ви можете роздрукувати його в STDOUT або повернути його як результат функції.
• Прийнятна або повна програма, або функція.
• Будь-яка кількість сторонніх пробілів є прийнятною до тих пір, поки символи належним чином вишикуються (наприклад, сміливо прокладайте як прямокутник).
• Стандартні лазівки заборонені.
• Це код-гольф, тому діють усі звичайні правила гольфу, і найкоротший код (у байтах) виграє.

Вугілля деревне , 17 байт

ＧＨ<↗↘>↖↙ＬθθＧＨ<Ｌθθ

Спробуйте в Інтернеті! Посилання на багатослівну версію коду. Пояснення:

ＧＨ

Малюємо по стежці.

<↗↘>↖↙

Накресліть у напрямках the ( <і >є скорочення для цих двох пар, але інші пари не мають скорочень.)

Ｌθ

Кожен відрізок шляху має однакову довжину, включаючи кінці, довжини введення.

θ

Використовуйте введення як текст, який потрібно записати по шляху.

ＧＨ<Ｌθθ

Роздрукуйте перші дві частини шляху ще раз, щоб середній символ був правильним.

05AB1E , 12 байт

gIR7._•Íη•Λ

Спробуйте в Інтернеті!

           Λ    use the canvas function
g               with the length of input for each segment
 IR7._          the input reversed and rotated left by 7 characters (we will draw this backwards to have the right center character)
      •Íη•     and the directions 1, 3, 3, 1, 7, 5, 5, 7 as a compressed number. 

JavaScript (ES6),  157 155  154 байт

Повертає матрицю символів.

s=>(y=n=s.length,y+=i=X=Y=-1,m=[...Array(y+n)].map(_=>r=Array(4*n-3).fill` `),g=x=>x?g(x-=r[m[y][++i==6*n-6||+x]=s[i%n],y-=m[y-Y]?Y:Y=-Y,x-X]?X:X=-X):m)``

Спробуйте в Інтернеті!

Як?

$n$$w\times h$

• $w = 4n-3$
• $h = 2n-1$

$(0,n-1)$

Індекс, що базується на 0, центрального символу, який слід пропустити у формі алмазу:

$n=4$

Прокоментував

s => (                           // s = input string
  y = n = s.length,              // n = length of s
  y += i = X = Y = -1,           // y = n - 1; i = X = Y = -1
  m =                            // create a matrix m[]:
    [...Array(y + n)].map(_ =>   //   - of height 2n-1
      r = Array(4 * n - 3)       //   - of width 4n-3 (save one of these rows in r[])
          .fill` `               //   - initially filled with spaces
    ),                           //
    g = x =>                     // g is a recursive function taking x
      x ?                        //   if x is truthy:
        g(                       //     do a recursive call:
          x -= r[                //       update x:
            m[y][                //         update m[y][x]:
              ++i == 6 * n - 6   //           unless this is the 2nd pass through the
              || +x              //           center cell, set it to the next character
            ] = s[i % n],        //           in s (otherwise we write to m[y][true]
                                 //           instead, which has no effect)
            y -=                 //         update y:
              m[y - Y] ? Y       //           bounce vertically if m[y - Y] is undefined
                       : Y = -Y, //
            x - X                //         bounce horizontally
          ] ? X                  //         if r[x - X] is undefined
            : X = -X             //
        )                        //     end of recursive call
      :                          //   else:
        m                        //     stop recursion and return m[]
)``                              // initial call to g with x = [''] (zero-ish but truthy)

JavaScript (ES6), 136 байт

f=
(s,l=s.length-1,z=l*4,a=[...Array(l-~l)].map(_=>Array(z+1).fill` `),g=x=>x--?g(x,a[a[y=(x+l)%z]?y:z-y][x>z?z+z-x:x]=s[x%-~l]):a)=>g(z+z)

<input oninput=o.textContent=f(this.value).map(c=&gt;c.join``).join`\n`><pre id=o>

Повертає двовимірний масив. Працює, втягуючи рядок в масив, безпосередньо обчислюючи координати призначення, що працюють назад від кінця, так що центральна комірка автоматично перезаписується. Пояснення:

(s

Рядок введення

,l=s.length-1

Відстань між "відскаками", також половина індексу останнього рядка і на один менше довжини.

,z=l*4

Останній індекс стовпця, також половина довжини тексту для малювання.

,a=[...Array(l-~l)].map(_=>Array(z+1).fill` `)

Масив пробілів.

,g=x=>x--

Відлік від останньої комірки до першої.

  ?g(x

Рекурсивний виклик для обробки решти комірок.

    ,a[a[y=(x+l)%z]?y:z-y]

Обчисліть рядок цієї комірки.

      [x>z?z+z-x:x]=s[x%-~l])

Обчисліть стовпець цієї комірки та символ, який там належить.

  :a

Завершіть, повернувши масив.

)=>g(z+z)

Почніть з кінця тексту.

J , ^{79 77} 75 байт

(|.@$~8*])`([:;/(1,~<:@])+/\@,(_2{&1 _1\#:33495)}.@#~])`(' '$~1+2 4*])}<:@#

Спробуйте в Інтернеті!

C (стук) , 201 196 188 байт

x,y,i,v,m,n;f(s,z){char*a=s,o[i=(y=z*2-1)*(x=y+y)];for(v=x*2-2;i;n=m=1)o[--i]=i%x?32:10;for(i=x*--z;v--;i+=x*m+n)o[i]==32?o[i]=*a:0,a=*++a?a:s,n=i%x>x-3?-1:n,m=i/x?i/x<y-1?m:-1:1;puts(o);}

Спробуйте в Інтернеті!

-13 пропозиції @ceilingcat

Пітон 2 , 137 байт

s=input();n=len(s);m=2*n-2
for r in range(m+1):print''.join([s[[x,-8-x][(x<=m)==(m>2*r)]%n],' '][r!=(x+1-n)%m!=m-r]for x in range(4*n-3))

Спробуйте в Інтернеті!

Повна програма, яка приймає рядок як вхід, як видає алмазну версію.