실제로 하지 으로도 영감을 Atbash 자기 회문 도에 의해 일반화 된 Gematria 계산기 .

문자열이 주어 s의 길이 N , 출력 Revu'a 시퀀스 의 첫 번째 문자, S 의 처음 두 문자 들 , ... 제 N 의 문자 -2 (S) , 제 N -1 문자 의 전체 의 .

문자열은 방향성 이 강하고 0x0000에서 0xFFFF 범위에있는 유니 코드 (원하는 인코딩) 문자로만 구성됩니다 . 그러나 방향성 제어 문자는 발생하지 않습니다. 주어진 문자열의 모든 문자는 같은 방향성을 갖습니다.

["t","te","tes","test"]공백으로 구분 된 문자열 "t te tes test",
t
te
tes
test
미리 형식화 된 배열 인 여러 줄 문자 로 배열 표기법으로 반환 할 수 있습니다

티
테
테스
테스트

오른쪽에서 왼쪽으로 입력하면 올바른 순서로 오른쪽에서 왼쪽으로 출력되어야합니다.
입력 : "נחמן"
출력 : "נ נח נחמ נחמן"또는

נ
נח
נחמ
נחמן

Dyalog APL, 2 바이트

,\

연결하여 누적 감소. 여기서 사용해보십시오 .

접두사 a⍕ 를 사용하면 출력 형식이 더 좋지만 올바른 순서가 없으면 명확하게 표시됩니다.

자바 스크립트 (ES6), 27 26 25 바이트

@nicael 및 @ MartinBüttner 덕분에 1 바이트 절약, @Neil 덕분에 1 바이트 절약

x=>x.replace(/.?/g,"$` ")

JS 기능 의 일부 내장 기능 을 활용 .replace합니다. 특히, 대체 $`에서 일치하는 문자 앞에있는 모든 것이됩니다. /.?/g대신 정규식을 사용하면 /./g끝에 빈 문자열과 일치합니다.

apt, 10 4 바이트

이 경우 누적 감소가 너무 유용하다는 것을 알지 못했습니다. :-)

UŒ+

기본적으로 쉼표로 구분 된 배열로 출력합니다. 이것이 허용되지 않으면 대신이 6 바이트 코드를 사용하십시오.

U¬å+ ·

온라인으로 사용해보십시오!

작동 원리

      // Implicit: U = input string
U¬    // Split U into chars.
  å+  // Cumulative reduce: loop through each item in the array, concatenating it to the total.
      // ["t","e","s","t"] => ["t","te","tes","test"].
      // Implicit: output last expression

Brainfuck, 40 바이트

내 콘솔은 오른쪽에서 왼쪽 문자를 지원하지 않지만 작동하지 않을 것이라고 생각합니다 .c

++++++++++>,[>,]<[<]>[[<+>-]<[<]>[.>]>]

언 골프 드 :

++++++++++> # Store 10 (Newline)
,[>,]       # Store input
<[<]>       # Goto first character
[           # While next character
  [<+>-]    # Copy character to the left
  <[<]>     # Goto first character
  [.>]      # Print all charaters
  >         # Go to next character
]

망막, 11 7 바이트

.
 $`$0

출력은 선행 공간과 후행 줄 바꿈으로 공백으로 구분됩니다.

온라인으로 사용해보십시오!

파이썬, 35

f=lambda s:f(s[:-1])+[s]if s else[]

거짓 and/or이기 때문에 재귀를 단순화하는 데 사용할 방법을 찾을 수 없습니다 [].

재귀 솔루션은 문자열 목록을 반환합니다.

온라인으로 사용해보십시오

프롤로그 (SWI), 60 49 바이트

암호:

p(X):-findall(S,atom_prefix(X,S),[_|R]),write(R).

설명 :

atom_prefix 와 X의 입력에 집합 S 변수로는 원자 1 프리픽스 제공 X를 빈 원자로 시작한다.

찾기 은 모든 솔루션을 가져 와서 목록에 넣습니다.

[_ | R] 머리 (빈 원자)를 버리고 꼬리를 R에 저장

예 :

p('נחמן').
[נ, נח, נחמ, נחמן]

p('test').
[t, te, tes, test]

여기에서 온라인으로 사용해보십시오

편집 : 꼬리 만 R에 저장하여 11 바이트를 절약했습니다 .

피 이스, 3

._z

접두사 내장이 트릭을 수행합니다.

테스트 스위트

GNU 세드, 21

-Esed 옵션에 대한 점수는 +1입니다 .

:
s/^(\S+)\S/\1 &/
t

LTR에서는 작동하지만 RTL에서는 작동하지 않습니다. 그 비트를 놓쳤습니다. . 실제로 않는 작업의 RTL 그냥 내 터미널에서 제대로 렌더링되지 않았습니다. 현명한 텍스트 편집기 (예 : emacs)에서 보는 IO에서 잘 작동합니다. 또한 Ideone에서도 작동합니다.

온라인으로 사용해보십시오.

Brachylog , 5 바이트 (비경쟁)

@[@w\

온라인으로 사용해보십시오!

설명

@[       Take a prefix of the input
  @w     Write this prefix to STDOUT followed by a linebreak
    \    False: try another prefix

오른쪽에서 왼쪽 문자열은 고려조차하지 않았지만 제대로 작동하는 것 같습니다.

CJam, 9 바이트

l{N2$@+}*

출력은 줄 바꿈으로 구분됩니다.

여기에서 테스트하십시오.

설명

l     e# Read input.
{     e# Fold this block over the input, which is effectively a foreach-loop which skips
      e# the first character...
  N   e#   Push a linefeed.
  2$  e#   Copy the previous string.
  @   e#   Pull up the current character.
  +   e#   Concatenate.
}*

자바 스크립트, 36 바이트

x=>[...x].map((c,i)=>x.slice(0,i+1))

데모:

a=x=>[...x].map((c,i)=>x.slice(0,i+1));
document.write(
  a("test")+"<br>"+
  a("נחמן")
)

원칙은 문자열 조각을 첫 번째 문자에서 단어의 모든 문자로 매핑하고 출력하는 것입니다. 놀랍게도 이것은 RTL 문자열에서도 완벽하게 작동하며 최적화가 필요하지 않습니다.

내 콘솔은 오른쪽에서 왼쪽 문자를 지원하지 않지만 작동하지 않을 것이라고 생각합니다 .c

C, 74 바이트 (2 번째 항목)

char m[2<<9];i;main(){do{m[i]=getchar();printf("%s ",m);}while(m[i++]>0);}

언 골프 드 :

#include <stdio.h>

// char, because `printf("%s", str);` expects a array of characters.
char str[2<<9];
int  str_len = 0;
int main(void) {
    do {
        str[str_len]=getchar();
        printf("%s ", str);
    } while(m[i++]>0);
    return 0;
}

내 콘솔은 오른쪽에서 왼쪽 문자를 지원하지 않지만 작동하지 않을 것이라고 생각합니다 .c

C, 105 바이트 (3 번째 항목)

m[2<<9];i;j;k;main(){while((m[i++]=getchar())<0);for(;j<i;j++,putchar(10))for(k=0;k<j;k++)putchar(m[k]);}

언 골프 드 :

#include <stdio.h>

int str[2<<9];
int str_len = 0;
int main(void) {
    do {
        str[str_len] = getchar();
    } while(str[str_len++] != EOF);
    int i;
    for(i=0; i<str_len; i++) {
        int j;
        for(j=0; j<i; j++) {
          putchar(str[j]);
        }
        putchar(10);
    }
}

TI-BASIC, 18 바이트

For(X,1,10^(9
Disp sub(Ans,1,X
End

기술적으로 유효하지 않음 : TI-BASIC은 유니 코드를 지원하지 않습니다.

이 이름을 지정 prgmA하고을 사용하여 입력하십시오 Ans.

프로그램 재귀는 짧아 지지만 변수를 초기화 할 방법은 없습니다. 따라서 각 반복마다 입력의 하위 문자열을 표시합니다. Disp는 값을 반환하지 않으므로 입력을 덮어 쓰지 않습니다.

결국 프로그램은 전체 문자열을 인쇄 한 후 오류와 함께 종료됩니다.

파이썬, 54 바이트

b='';y=input()
for a in range(len(y)):b+=y[a];print(b)

자바 7, 95 92 바이트

String d(String a){for(int i=a.length();i-->0;a=a.substring(0,i)+(i>0?"\n":"")+a);return a;}

이전 답변 ( 95 바이트 ) :

String c(String s){String r="";for(int i=0;++i<=s.length();r+=s.substring(0,i)+"\n");return r;}

재귀 적 접근법을 시도했지만 실제로 작동시키지 못했습니다. 아마도 다른 사람이 (이 for-loop보다 짧은) 것입니다.

언 골프 및 테스트 사례 :

여기에서 시도하십시오.

class M{
  static String d(String a){
    for(int i = a.length(); i-- > 0; a = a.substring(0, i) + (i > 0 ? "\n" : "") + a);
    return a;
  }

  public static void main(String[] a){
    System.out.println(c("test"));
    System.out.println();
    System.out.println(c("נחמן"));
  }
}

산출:

t
te
tes
test

נ
נח
נחמ
נחמן

딥 , 1 바이트 (비경쟁)

E

설명:

.   # Implicit input
 E  # Get prefixes
  . # Implicit print

MATL , 8 바이트

사용 최신 버전 (8.0.0) 언어 / 컴파일러를

jtn1X"YR

예

>> matl
 > jtn1X"YR
 >
> test
t
te
tes
test

설명

j           % input string
tn          % duplicate and get length, say "N"
1X"         % repeat string N times vertically. Gives a char matrix
YR          % lower triangular part of matrix. Implicitly print

매스 매 티카, 29 바이트

#<>#2&~FoldList~Characters@#&

TODO : 설명

𝔼𝕊𝕄𝕚𝕟, 7 자 / 16 바이트

ᴉⓜᵖ ᵴ˖$

Try it here (Firefox only).

어딘가에 내장 된 것이있을 것입니다. 아직 찾지 못했습니다.

설명

ᴉⓜᵖ ᵴ˖$ // implicit: ᴉ=split input, ᵴ=empty string
ᴉⓜ      // map over ᴉ
   ᵖ ᵴ˖$ // push ᵴ+=(mapped item char)
         // implicit stack output, separated by newlines

자바 스크립트 ES6, 29 바이트

(a,b='')=>[...a].map(x=>b+=x)

이것은 아무것도 얻지 못하지만 간단한 해결책입니다.

피시스, 11 바이트

Vlz=k+k@zNk

사용해보십시오

설명

(z=input)
(k="")
V        for N in Range(
lz       length of z):
=k+k@zN     k=k+z[N]
k           print(k)

파이썬, 32 바이트

f=lambda s:s and f(s[:-1])+" "+s

공백으로 구분 된 문자열을 선행 공백으로 출력하는 재귀 함수입니다.

34 바이트 프로그램 (Python 2) :

s=""
for c in input():s+=c;print s

V , 5 바이트 (비경쟁)

òÄ$xh

온라인으로 사용해보십시오!

이 언어는 도전보다 새로운 언어이므로이 대답은 경쟁이되지 않습니다. 설명:

ò       " Recursively:
 Ä      "   Duplicate this line
  $     "   Move to the end of this line
   x    "   Delete one character
    h   "   Move one character to the right, which will throw an error when the line is one character long

PowerShell v2 +, 28 바이트

[char[]]$args[0]|%{($o+=$_)}

입력 $args[0]을 받아 char배열 로 캐스트 하고 문자를 루프로 파이프합니다 |%{...}. 반복 할 때마다 현재 문자 를 $o통해 누적 됩니다. 이 표현식은 Parens로 캡슐화되어 사본이 파이프 라인에 배치됩니다. 실행이 끝나면 파이프 라인이 플러시 되어 요소 사이에 줄 바꿈이 생깁니다.+=$_Write-Output

PS C:\Tools\Scripts\golfing> .\spell-out-the-revua "נחמן"
נ
נח
נחמ
נחמן

PS C:\Tools\Scripts\golfing> .\spell-out-the-revua "PPCG"
P
PP
PPC
PPCG

PHP, 59 바이트

for(;$i++<mb_strlen($argn);)echo"\n".mb_substr($argn,0,$i);

온라인 버전

원하지 않는, 불필요한, 기회 , 9 바이트

E<+S0;*P