별칭을 바꾸어 문구를 만듭니다. “Code”, “#2

C 지시어에서 영감을 얻었습니다 #define.

도전

별명을 가진 하나의 문구와 별명 텍스트를 가진 하나의 배열이 제공됩니다. 각 별칭을 해당 텍스트로 바꾸는 초기 문구를 출력하십시오.

별칭은 #배열에서 하나의 sharp 다음에 해당 인덱스 가 정의됩니다 (인덱스가 0 또는 1에서 시작될 수 있음). 별명은 텍스트 내에 다른 별명을 포함 할 수 있으며 모든 별명을 재귀 적으로 분석해야합니다. 별칭이 무한 루프에 빠지지 않는다고 가정 할 수 있습니다. 별명은 선행 0을 갖지 않습니다 ( #02index의 별명은 아니고 index의 2별명 0은 text입니다 2).

배열이 20 개의 항목 길이를 전달하지 않는다고 가정 할 수 있습니다.

프로그램이나 함수를 작성하거나 심지어 #define좋을 수도 있습니다. 🙂

언어에 더 적합한 다른 입력 방법을 사용할 수도 있습니다.

phrase: "#0 & #3"
array: [
    "Programming #1",
    "Puzzles",
    "Code",
    "#2 Golf"
]
output: "Programming Puzzles & Code Golf"

단계별 :

0> "#0 & #3"
1> "Programming #1 & #2 Golf"
2> "Programming Puzzles & Code Golf"

이 때문에 바이트 단위의 최단 답변이 승리합니다!

다른 샘플

phrase: "#0!"
array: [
    "We are #1",
    "#2",
    "#3",
    "#4 !",
    "graduating"
]
output: "We are graduating !!"

phrase: "##0#1#0#21#3#4"
array: [
    "a",
    "m",
    "z",
    "n",
    "g"
]
output: "#amaz1ng"

phrase: "##1#23"
array: [
    "WEIRD",
    "0 C",
    "AS"
]
output: "WEIRD CAS3"

phrase: "#1#7#6y#4#7#10s#7b#11#0#0#11r#7#0h#6#5#2#5#9#4."
array: [
    "t",
    "#12#3",
    "#11ga#3",
    "#0#10v#11",
    "#0h#10#8g",
    "#7#8",
    "a#8",
    " ",
    "n",
    "o",
    "i",
    "e",
    "P#9s#10"
]
output: "Positive anything is better than negative nothing."

위의 예제는 인덱스가 0에서 시작하는 Array를 사용했습니다.



답변

자바 스크립트 (ES6) 58

재귀 함수

f=(s,h,r=s.replace(/#(1?\d)/g,(_,x)=>h[x]))=>r==s?r:f(r,h)

테스트

f=(s,h,r=s.replace(/#(1?\d)/g,(_,x)=>h[x]))=>r==s?r:f(r,h)

// Version without default parameters, same length but using a global
// f=(s,h)=>(r=s.replace(/#(1?\d)/g,(_,x)=>h[x]))==s?r:f(r,h)

console.log=x=>O.textContent+=x+'\n'

;[
  ['##1#23',['WEIRD','0 C','AS']],
  ["#0!",["We are #1","#2","#3","#4 !","graduating"]],
  ["##0#1#0#21#3#4",["a","m","z","n","g"]],
  ["##0#1#0#21#13#4",["a","m","z","","g","","","","","","","","","n"]],
  ["#1#7#6y#4#7#10s#7b#11#0#0#11r#7#0h#6#5#2#5#9#4.",
    ["t","#12#3","#11ga#3","#0#10v#11","#0h#10#8g","#7#8","a#8"," ","n","o","i","e","P#9s#10"]
  ],
  ["#0 & #3",["Programming #1","Puzzles","Code","#2 Golf"]]
].forEach(t=>{
  var a=t[0],b=t[1]
  console.log(a+' ['+b+']\n -> '+f(a,b))
})
<pre id=O></pre>


답변

Mathematica, 74 바이트

FixedPoint[#~StringReplace~a&,a=0;a=Reverse["#"<>ToString@a++->#&/@#2];#]&

너무 복잡하지 않습니다. 그것의 대부분은 인덱스를 만들기 위해 최선을 다하고 있습니다.


답변

줄리아, 112 (107) 66 바이트

f(s,x)=(r=replace(s,r"#1?\d",m->x[1+parse(m[2:end])]))==s?s:f(r,x)

이것은 문자열 배열을 받아들이고 문자열을 반환하는 재귀 함수입니다. 0 기반 인덱싱을 사용합니다.

우리는 문자열 구성하여 시작 R 입력 문자열 정규 표현식의 모든 일치와 #1?\d의 요소로 대체 x는 경기의 파싱 1 개 + 정수에 해당. 이 같은 경우 , 우리는 반환 그렇지 않으면 우리는 통과, 재귀, R을 문자열로.


답변

C, 269 232

#define f(p,a,l)char*n,o[999],i=0,c,x;for(strcpy(o,p);o[i];)o[i]==35&isdigit(o[i+1])?c=o[i+1]-48,c=isdigit(o[i+2])&c?10*c+o[i+2]-48:c,n=a[c<l?c:c/10],x=strlen(n),memmove(o+i+x,o+i+2+c/10,strlen(o+i)),i=!memmove(o+i,n,x):++i;puts(o);

요청에 #define따라 문제를 해결 하는 단일 ! C 매크로는 재귀적일 수 없으므로 문제를 반복적으로 해결해야했습니다. 매크로는 3 개의 인수를 취합니다. 문구 p배열 a과 배열의 길이 l. 나는 ungolfed 솔루션에서 공백 만 제거했습니다. 저장할 수있는 문자가 몇 개 더 있다는 것을 알고 있지만 200 개 미만으로 줄 것이라고 생각하지 않습니다. 이것은 경쟁 솔루션이 아닐 것입니다. 해결책은 완전히 골프입니다. 아래 함수 형태의 언 골프 솔루션 :

f(char*p,char**a,int l){
  char o[999]={0},i=0;
  strcpy(o,p);
  while(o[i]){
    if(o[i]=='#'&&isdigit(o[i+1])){
      int c = o[i+1]-'0';
      if(isdigit(o[i+2])&&c)
        c=10*c+o[i+2]-'0';
      if(c>=l)
        c/=10;
      char *n=a[c];
      memmove(o+i+strlen(n),o+i+2+c/10,strlen(o+i));
      memmove(o+i,n,strlen(n));
      i=0;
    }else{
      i++;
    }
  }
  puts(o);
}

그리고 테스트 코드 :

void test(char *phrase, char **array, int length) {
  f(phrase, array, length);
}

main() {
  const char *t1[] = {
    "Programming #1","Puzzles","Code","#2 Golf"
  };
  test("#0 & #3", t1, 4);

  const char *t2[] = {
    "We are #1","#2","#3","#4 !","graduating"
  };
  test("#0!", t2, 5);

  const char *t3[] = {
    "a","m","z", "n","g"
  };
  test("##0#1#0#21#3#4", t3, 5);

  const char *t4[] = {
    "WEIRD","0 C","AS"
  };
  test("##1#23", t4, 3);

  const char *t5[] = {
    "t","#12#3","#11ga#3","#0#10v#11","#0h#10#8g","#7#8","a#8"," ","n","o","i","e","P#9s#10"
  };
  test("#1#7#6y#4#7#10s#7b#11#0#0#11r#7#0h#6#5#2#5#9#4.", t5, 13);
}

편집 : 골프 마술을했습니다. 내가 생각하는 것만 큼 짧고 읽을 수 없습니다.


답변