Ми всі чули про проблему «Fizz Buzz», але що відбувається, коли ви намагаєтесь застосувати її з більшою кількістю факторів? Fizz Buzz Crackle Pop!

Змагання

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

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

Ви можете взяти цей рядок з будь-якого командного рядка або STDIN.

Тоді для всіх цілих чисел від 1 до k, якщо це розділяється на будь-який з int1 , int2 ... intn , виведіть усі відповідні str s у порядку введення, а потім новий рядок. Якщо це не так, просто виведіть ціле число, а потім новий рядок.

Наприклад, із введенням

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) в будь-якому місці
• Повні програми, будь ласка.
• Припустимо непусті рядки для строків
• Немає гарантій на унікальність інт

Зразок програми 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';}}

Безголівки:

#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 примі : õце 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

Спробуйте в Інтернеті!