Вращающиеся спирали


12

Учитывая квадрат текста, представляющий спираль символов, вращайте его!

Спираль начинается в центре и движется против часовой стрелки к внешнему краю, начиная слева от центра:

987
216
345

Это переводит на строку 123456789. Поворот выполняется влево , поэтому если повернуть его на одну позицию, он будет 234567891. Это представлено:

198
327
456

вход

Вход состоит из спирали и расстояния, чтобы повернуть ее.

Расстояние всегда будет положительным целым числом или нулем и может быть ограничено пределом типа данных вашего языка.

Спираль должна быть принята за строку с выбранным разделителем строк (без разделителя). Он всегда будет квадратным, не считая разделителей, и имеет нечетную длину стороны.

Предположим, что все символы буквенно-цифровые [A-Za-z0-9].

Выход

Выходом является вращающаяся спираль. Это должен быть квадрат на нескольких строках (независимо от того, напечатан он или возвращен).

Примеры

вход

3
tne
atd
bin

Выход

bat
nit
den

вход

18
efilr
naepo
umshf
tootr
butte

Выход

rettu
omseb
oofft
trliu
hpean

Это кодовый гольф с подсчетом очков в байтах, как обычно.

Ответы:


6

CJam, 45 44 байта

]]l~LqN/{(W%@+\zW%}h;m<{1$,/(W%a@W%z+\s}h;N*

Проверьте это здесь.

объяснение

Ленивое решение: разверните спираль, используйте вращение встроенного массива CJam, снова сверните спираль.

]]       e# Push [""]. We'll later use this to roll up the spiral.
l~       e# Read the integer and evaluate it.
L        e# Push an empty string: we'll unroll the input into this.
qN/      e# Read the spiral and split it into lines.
{        e# While the top of the stack is truthy...
  (W%    e#   Pull the first line off the spiral and reverse it.
  @+     e#   Pull up the string we've built so far and prepend the reversed line.
  \zW%   e#   Swap with the remaining spiral, and rotate the spiral.
}h       e# This terminates when the centre character has been added to the string and
         e# the spiral becomes an empty array.
;        e# Discard the empty array.
         e# Note that we've unrolled the spiral from outside in, but we've also built up
         e# the string in reverse, which gives us the string from inside out.
m<       e# Rotate to the left by the given number of characters.
{        e# While the top of the stack is truthy...
  1$,    e#   Copy the spiral so far and get the number of lines.
  /      e#   Split the string into chunks of that size.
  (W%a   e#   Pull off the first chunk, reverse it and wrap it in an array.
  @zW%   e#   Pull up the spiral so far, rotate it.
  +      e#   Prepend the chunk to the spiral as a line.
  \s     e#   Swap with the other chunks and flatten them into a string again.
}h       e# This terminates when the string has been used up completely.
;        e# Discard the empty string.
N*       e# Join the lines with linefeed characters.
Используя наш сайт, вы подтверждаете, что прочитали и поняли нашу Политику в отношении файлов cookie и Политику конфиденциальности.
Licensed under cc by-sa 3.0 with attribution required.