Мы все слышали о проблеме Fizz Buzz, но что происходит, когда вы пытаетесь применить ее с большим количеством факторов? Fizz Buzz Crackle Pop!

Соревнование

Напишите полную программу, которая принимает целочисленный ввод n , затем n кортежей, содержащих целое число и строку, затем другое целое число (> 1) k, как таковое:

 n int1 str1 int2 str2 (...) intn strn k

Вы можете взять эту строку из командной строки или STDIN.

Тогда для всех целых чисел 1 к, если он делится на любой из int1 , int2 ... INTN , выход все соответствующие ул ами в порядке ввода, а затем перевод строки. Если это не так, просто выведите целое число, за которым следует новая строка.

Например, с вводом

3 2 Fizz 3 Buzz 5 Crackle 10

мы получаем

1
Fizz
Buzz
Fizz
Crackle
FizzBuzz
7
Fizz
Buzz
FizzCrackle

Но с вводом (обратите внимание на изменение порядка)

3 3 Buzz 2 Fizz 5 Crackle 10

мы получаем

1
Fizz
Buzz
Fizz
Crackle
BuzzFizz
7
Fizz
Buzz
FizzCrackle

Необязательный завершающий перевод новой строки приемлем.

Самый короткий код в байтах побеждает.

Редактирование:

Очевидно, я многое пропустил, извините.

• Входы из консоли и STDIN, все остальное получает +5 байт (: c) где угодно
• Полные программы, пожалуйста.
• Предположим, непустые строки для strs
• Нет гарантий уникальности целых

Пример программы на C ++ (ограничено 20, потому что я ленивый):

#include <iostream>
#include <string>
using namespace std;

int main() {
  string names[20];
  int mods[20], n, max;
  cin >> max >> n;
  for (int i=0; i<n; i++) {
    cin >> mods[i] >> names[i];
  }
  for (int i=1; i<=max; i++) {
    bool found = false;

    for (int j=0; j<n; j++) {
      if (i % mods[j] == 0) {
        found = true;
        cout << names[j];
      }
    }
    if (!found)
     cout << i;
    cout << endl;
  }

  return 0;
}

05AB1E , 28 байтов

#¦¤U¨2ôøVXLvY`sysÖÏJDg1‹iy},

Попробуйте онлайн!

Или с другим форматом ввода:

05AB1E , 16 байтов

Lv²y³ÖÏJDg1‹iy},

Попробуйте онлайн!

JavaScript (ES6), 90 байт

Создает ведущий перевод строки.

f=(a,i=a.pop())=>i?f(a,i-1)+`
`+(a.map((_,j)=>++j>a[0]|i%a[j*2-1]?'':a[j*2]).join``||i):''

Тест

f=(a,i=a.pop())=>i?f(a,i-1)+`
`+(a.map((_,j)=>++j>a[0]|i%a[j*2-1]?'':a[j*2]).join``||i):''

console.log(f([3, 2, 'Fizz', 3, 'Buzz', 5, 'Crackle', 10]))
console.log(f([3, 3, 'Buzz', 2, 'Fizz', 5, 'Crackle', 10]))

Python 2 , 98 байт

lambda b:[''.join(''if x%b[1+i*2]else b[2+i*2]for i in range(b[0]))or`x`for x in range(1,b[-1]+1)]

Попробуйте онлайн!

C ++, 194 байта

#include <iostream>
#define p std::cout<<
int main(int c,char**a){c=2*atoi(a[1])+2;int x,f,i,n=atoi(a[c]);for(x=1;x<=n;x++){f=0;for(i=2;i<c;i+=2)if(x%atoi(a[i])<1)f=1,p a[i+1];if(!f)p x;p'\n';}}

Ungolfed:

#include <iostream>

int main(int c, char **a) {
    c = 2 * atoi(a[1]) + 2;
    int x, f, i, n = atoi(a[c]);
    for (x = 1; x <= n; x++) {
        f = 0;
        for (i = 2; i < c; i += 2)
            if (x % atoi(a[i]) < 1) f = 1, std::cout << a[i+1];
        if (!f) std::cout << x;
        std::cout << '\n';
    }
}

PHP, 99 байт

Основываясь на ответе FizzBuzz от Primo : õchr (245), немного перевернутый перевод строки.

for(;$i++<($a=$argv)[$z=$argc-1];){for($k=$s="";$z>$k+=2;)$s.=[$a[$k+1]][$i%$a[$k]];echo$s?:$i,~õ;}

игнорирует первый аргумент; беги с -nr.

JavaScript (ES6), 105 97 байт

g=(m,k,i=1)=>i<-~k?([...m.keys()].filter(j=>i%j<1).map(j=>m.get(j)).join``||i)+"\n"+g(m,k,i+1):""

Берет на карту пар m (целое число, строка) и целое число k . Поставляется с завершающим символом новой строки.

Вот нерекурсивная версия (105 байт), но она не приводит к завершающему переводу строки.

m=>k=>[...Array(k).keys()].map(x=>[...m.keys()].filter(j=>-~x%j<1).map(j=>m.get(j)).join``||x+1).join`\n`

Попробуйте онлайн!

Java, 331 байт

Потому что Java.

import java.util.*;class A{A(int c,String x){i=c;v=x;}int i;String v;void x(String[]x){ArrayList<A>l=new ArrayList();int n=0;for(;++n<x.length-1;)l.add(new A(Integer.valueOf(x[n++]),x[n]));n=Integer.valueOf(x[n]);for(int i=1;i++<n;){String o="";boolean y=1>0;for(A a:l)if(i%a.i==0){y=1<0;o+=a.v;}if(y)o+=i;System.out.println(o);}}}

Это полный класс, необходимый для этого. Однако для его запуска необходимо вызвать метод xв существующем экземпляре A. Для тестирования ниже я предоставил исполняемый класс командной строки, который частично не задействован.

import java.util.*;
class A{
A(int c,String x){i=c;v=x;}
int i;
String v;
void x(String[]x){
ArrayList<A>l=new ArrayList();
int n=0;
for(;++n<x.length-1;)
l.add(new A(Integer.valueOf(x[n++]),x[n]));
n=Integer.valueOf(x[n]);
for(int i=1;i++<n;){
String o="";
boolean y=1>0;
for(A a:l)if(i%a.i==0){y=1<0;o+=a.v;}
if(y)o+=i;
System.out.println(o);
}
}
public static void main(String[] args) {
new A(0,"").x(args);
}
}

сложено , 85 байт

args rev...2*nsgroup rev 2 chunk@s~>{!s[1#]map s[0#n|]map keep''join:[n]\¬if out}map

Попробуйте онлайн! В качестве альтернативы, 86 байтов:

args behead...@k sgroup 2 chunk@s k~>{!s[1#]map s[0#n|]map keep''join:[n]\¬if out}map

постоянный ток , 121 байт

?dstsw?[rdlt:Y:Rlt1-dst0<q]dsqx?sb1sm[ln;Y;RnlP1+sP]ss[lmn]sF[1sn0sP[lnd;Ylmr%0=s1+dsnlw!<g]dsgxlP0=Flm1+dsm10Plb!<i]dsix

Вводит 3 отдельные строки: первая строка содержит целое число n, вторая содержит int strкортежи со строками, заключенными в квадратные скобки ( []), а третья строка состоит из целого числа k. Например, 3 2 Fizz 3 Buzz 5 Crackle 10может быть введен как:

3
3 [Buzz] 2 [Fizz] 5 [Crackle]
10

Попробуйте онлайн!

Или принимая входные данные в другом порядке:

постоянный ток , 118 байт

?dstsw[dlt:Y:Rlt1-dst0<q]dsqxsb1sm[ln;Y;RnlP1+sP]ss[lmn]sF[1sn0sP[lnd;Ylmr%0=s1+dsnlw!<g]dsgxlP0=Flm1+dsm10Plb!<i]dsix

Это принимает входные данные в другом порядке, но в одной строке в формате

k [str1] int1 [str2] int2 (...) [strn] intn n

Например, 3 2 Fizz 3 Buzz 5 Crackle 10будет введен как:

10 [Buzz] 3 [Fizz] 2 [Crackle] 5 3

Попробуйте онлайн!