Вдохновленный C- директивой #define.

Вызов

Дана одна фраза с некоторым псевдонимом и один массив с каждым текстом псевдонима. Выведите исходную фразу, заменив каждый псевдоним соответствующим текстом.

Псевдоним определяется одним острием, #за которым следует его индекс в массиве (индекс может начинаться с нуля или единицы). Псевдоним может содержать другой псевдоним внутри текста, и вы должны разрешить все их (возможно, рекурсивно). Вы можете предположить, что псевдоним никогда не попадет в бесконечный цикл. У псевдонима не будет начальных нулей ( #02это не псевдоним в индексе 2, это псевдоним в индексе, 0за которым следует текст 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."

В приведенных выше примерах используется массив с индексом, начинающимся с нуля.

JavaScript (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 в качестве входной строки s, в которой все совпадения регулярного выражения #1?\dзаменены элементом x, соответствующим 1 + целое число, проанализированное из совпадения. Если это равно s , мы возвращаем s , в противном случае мы , передавая r в качестве строки.

С 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решения проблемы! Макросы Си не могут быть рекурсивными, поэтому проблему пришлось решать итеративно. Макрос принимает 3 аргумента; фраза p, массив aи длина массива l. Я только убрал пробел из моего неопрятного решения; Я знаю, что есть еще несколько персонажей, которые я могу сохранить, но я не думаю, что это даст мне меньше 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);
}

РЕДАКТИРОВАТЬ: работал немного магии гольфа. Она настолько коротка и нечитаема, насколько я думаю.