Todos nós já ouvimos falar do antigo problema do Fizz Buzz, mas o que acontece quando você tenta aplicá-lo com mais fatores? Fizz Buzz Crackle Pop!

O desafio

Escreva um programa completo que use uma entrada inteira n , depois n tuplas contendo um número inteiro e uma sequência de caracteres e, em seguida, outro número inteiro (> 1) k, como tal:

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

Você pode pegar essa linha na linha de comando ou no STDIN.

Então, para todos os números inteiros 1 a k, se é divisível por qualquer um dos int1 , int2 ... intn , imprima todos os str s correspondentes na ordem de entrada, seguidos por uma nova linha. Se não estiver, basta gerar o número inteiro, seguido por uma nova linha.

Por exemplo, com entrada

3 2 Fizz 3 Buzz 5 Crackle 10

Nós temos

1
Fizz
Buzz
Fizz
Crackle
FizzBuzz
7
Fizz
Buzz
FizzCrackle

Mas com entrada (observe a alteração na ordem)

3 3 Buzz 2 Fizz 5 Crackle 10

Nós temos

1
Fizz
Buzz
Fizz
Crackle
BuzzFizz
7
Fizz
Buzz
FizzCrackle

A nova linha à direita opcional é aceitável.

O código mais curto em bytes vence.

Editar% s:

Obviamente, perdi muito, desculpe.

• Entradas do console e do STDIN, qualquer outra coisa recebe +5 bytes (: c) em qualquer lugar
• Programas completos, por favor.
• Assumir strings não vazias para strs
• Nenhuma garantia para exclusividade de ints

Exemplo de programa C ++ (limitado a 20 porque sou preguiçoso):

#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 bytes

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

Experimente online!

Ou com um formato de entrada diferente:

05AB1E , 16 bytes

Lv²y³ÖÏJDg1‹iy},

Experimente online!

JavaScript (ES6), 90 bytes

Gera uma nova linha líder.

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):''

Teste

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 bytes

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)]

Experimente online!

C ++, 194 bytes

#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 bytes

Baseado na resposta do primo no FizzBuzz : õé chr (245), uma nova linha um pouco invertida.

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

ignora o primeiro argumento; corra com -nr.

JavaScript (ES6), 105 97 bytes

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):""

Toma em um mapa de pares m (inteiro, string) e um inteiro k . Vem com uma nova linha à direita.

Aqui está uma versão não recursiva (105 bytes), mas não gera uma nova linha à direita.

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

Experimente online!

Java, 331 bytes

Porque 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);}}}

Esta é a classe completa necessária para isso. No entanto, para executá-lo, você deve chamar o método xem uma instância existente de A. Para fins de teste, forneço uma classe executável da linha de comando abaixo, que é parcialmente desfeita.

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);
}
}

empilhados , 85 bytes

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

Experimente online! Como alternativa, 86 bytes:

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

dc , 121 bytes

?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

Recebe entrada em 3 linhas separadas, a primeira linha contendo o número inteiro n, a segunda abrigando as int strtuplas com as cadeias entre colchetes ( []) e a terceira linha consiste no número inteiro k. Por exemplo, 3 2 Fizz 3 Buzz 5 Crackle 10poderia ser inserido como:

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

Experimente online!

Ou recebendo informações em uma ordem diferente:

dc , 118 bytes

?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

Isso leva a entrada em uma ordem diferente, mas em uma única linha no formato

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

Por exemplo, 3 2 Fizz 3 Buzz 5 Crackle 10seria inserido como:

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

Experimente online!