Thử thách

Đầu vào:

Một số nguyên nằm giữa 2 và 62 (đã bao gồm).$b$

Đầu ra:

Đếm từ đến tương đương trong cơ sở , sử dụng bất kỳ biểu diễn hợp lý nào cho các chữ số.$1$$5000_{10}$$b$

Tuy nhiên:

• Nếu số chia hết cho (làm tròn xuống, ví dụ: cơ sở 7 sẽ là = 3,5, 3,5 + 1 = 4,5, làm tròn thành 4 ), sau đó xuất 'Fizz' thay vì số .$\lfloor b÷2+1\rfloor$

• Nếu số chia hết cho (làm tròn lên, ví dụ 11/3 = 3.666, 3.666 + 3 = 6.666, làm tròn thành 7 ), sau đó xuất 'Buzz'.$\lceil b÷3+3\rceil$

• Như bạn có thể đoán, nếu số của bạn chia hết cho cả hai, hãy xuất 'Fizzbuzz'.

Ví dụ

Sử dụng [0-9] , [AZ] và [az] làm chữ số

(Tôi chỉ bao gồm 10 giá trị đầu tiên để rút ngắn các ví dụ - thông thường sẽ có thêm 4990 mục trong mỗi chuỗi)

Đầu vào: 10 (vì vậy 'Fizz' = 6 và 'Buzz' = 7)

Đầu ra: 1, 2, 3, 4, 5, Fizz, Buzz, 8, 9, 10

Đầu vào: 2 (vì vậy 'Fizz' = 2 và 'Buzz' = 4)

Đầu ra: 1, Fizz, 11, Fizzbuzz, 101, Fizz, 111, Fizzbuzz, 1001, Fizz

(Tôi đã bao gồm 50 giá trị đầu tiên sau đây để thể hiện tốt hơn cách chúng hoạt động)

Đầu vào: 55 (vì vậy 'Fizz' = = và 'Buzz' = = )$28_{10}$$s_{55}$$22_{10}$$m_{55}$

Đầu ra: 1, 2, 3, 4, 5, 6, 7, 8, 9, a, b, c, d, e, f, g, h, i, j, k, l, Buzz, n, o, p, q, r, Fizz, t, u, v, w, x, y, z, A, B, C, D, E, F, G, H, I, J, K, L, M, N

Quy tắc

• Sơ hở tiêu chuẩn bị cấm
• Đây là Code Golf, vì vậy câu trả lời ngắn nhất bằng byte thắng
• Đầu vào và đầu ra có thể thông qua bàn điều khiển, hoặc đối số / trả về hàm
• Khoảng trắng hàng đầu / dấu là tốt, cũng như các dòng trống
• Khoảng cách giữa 'Fizz' và 'Buzz' không được phép
• Bất kỳ biến thể viết hoa nào của 'Fizz' / 'Buzz' / 'Fizzbuzz' đều ổn.
• Đầu ra nên được phân tách bằng dòng mới.
• Nếu bạn trả về một mảng gồm 10 chữ số cơ bản thay vì biểu thị chúng bằng các ký tự, thì chúng phải theo đúng thứ tự!

Thạch ,  42 38 34 33 29  32 byte

+3 tuân thủ các quy tắc định dạng nghiêm ngặt

5ȷɓ;8Ä:2,3‘ḍȧ"“Ƈד=%»ḟ0Fȯb@K¥ð€Y

Một chương trình đầy đủ mà in 5000 dòng văn bản, mỗi dòng chứa một loạt các số nguyên (các chữ số) hoặc một trong fizz, buzzhoặc fizzbuzz(hoạt động tốt ngoài cơ sở 62).

Hãy thử trực tuyến!

Làm sao?

Lưu ý rằng
$\lfloor b÷2+1\rfloor\ = \lfloor b÷2\rfloor+1$
... và
$\lceil b÷3+3\rceil = \lceil b÷3+2\rceil+1 = \lceil (b+6)÷3\rceil+1 = \lfloor (b+8)÷3\rfloor+1$

đang cập nhật ...

5ȷɓ;8Ä:2,3‘ḍȧ"“Ƈד=%»ḟ0Fȯb@ð€ - Link: integer, b
5ȷ                            - 5*10³ = 5000
  ɓ                        ð€ - for €ach n in [1,2,...,5000] get this f(b,n):
    8                         -   eight
   ;                          -   concatenate      -> [b,8]
     Ä                        -   cumulative sums  -> [b,b+8]
       2,3                    -   pair literal        [2,3]
      :                       -   integer division -> [b//2, (b+8)//3]
          ‘                   -   increment        -> [b//2+1, (b+8)//3+1]
           ḍ                  -   divides n?       -> [n is fizzy?, n is buzzy?]
              “Ƈד=%»         -   list of dictionary strings = ['fizz','buzz']
             "                -   zip with:
            ȧ                 -     logical AND    -> [0,0], ['fizz',0], [0,'buzz'],
                              -                       or ['fizz','buzz']
                      0       -   zero
                     ḟ        -   filter discard   -> [], ['fizz'], ['buzz'],
                              -                       or ['fizz','buzz']
                       F      -   flatten          -> [], ['fizz'], ['buzz'],
                              -                       or ['fizzbuzz']
                          @   -   using swapped arguments:
                         b    -     (n) to a list of digits in base (b)  (say, [nb])
                        ȯ     -   logical OR       -> [nb], ['fizz'], ['buzz'],
                              -                       or ['fizzbuzz']

Than , 40 byte

ＮθＥ…·¹×⁵φ∨⁺⎇﹪ι⊕÷θ²ωFizz⎇﹪ι÷⁺¹¹θ³ωBuzz⍘ιθ

Hãy thử trực tuyến! Liên kết là phiên bản dài dòng của mã. Giải trình:

Ｎθ                                      Input `b` into variable `q`
   ¹                                    Literal 1
 …·                                     Inclusive range to
      φ                                 Predefined variable 1000
    ×                                   Multiplied by
     ⁵                                  Literal 5
Ｅ                                       Map to
           ι                            Current value
          ﹪                             Modulo
              θ                         Input value
             ÷                          Floor divide
               ²                        Literal 2
            ⊕                           Incremented
         ⎇                              If nonzero
                ω                       Then predefined empty string
                 Fizz                   Otherwise literal `Fizz`
        ⁺                               Concatenated with
                       ι                Current value
                      ﹪                 Modulo
                            θ           Input value
                         ⁺              Plus
                          ¹¹            Literal 11
                        ÷               Integer divided by
                             ³          Literal 3
                     ⎇                  If nonzero
                              ω         Then predefined empty string
                               Buzz     Otherwise literal `Buzz`
       ∨                                Logical Or
                                    ι   Current value
                                   ⍘    Converted to base
                                     θ  Input value
                                        Implicitly print each result on its own line

R , 163 131 byte

b=scan();for(d in 1:5e3)cat(list(d%/%b^rev(0:log(d,b))%%b,'fizz','buzz','fizzbuzz')[[1+(!d%%((b+2)%/%2))+2*!d%%((b+11)%/%3)]],'\n')

Hãy thử trực tuyến!

Cảm ơn @digEmAll đã lưu 23 byte. Sau đó, tôi tiếp tục đánh gôn @ digEmAll để cứu thêm 9 người nữa.

JavaScript (ES6),  117  116 byte

$19_{20}$$19$$21_{20}$$1,1$

b=>(g=n=>n>1?g(n-1)+`
`+((s=n%(b+2>>1)?'':'Fizz',n%(b/3+3.9|0)?s:s+'Buzz')||(g=n=>n?[...g(n/b|0),n%b]:s)(n)):1)(5e3)

Hãy thử trực tuyến!

(giới hạn ở 100 để đầu ra của TIO không nổ)

Python 2 , 116 byte

b=input()
i=0
exec"a=i=i+1;d=[]\nwhile a:d=[a%b]+d;a/=b\nprint'Fizz'*(i%(b/2+1)<1)+'Buzz'*(i%(~-b/3+4)<1)or d;"*5000

Hãy thử trực tuyến!

Hoặc với 0-9a-zA-Zđầu ra:

Python 2 , 143 byte

b=input()
i=0
exec"a=i=i+1;d=''\nwhile a:d=chr(a%b+48+(a%b>9)*39-a%b/36*58)+d;a/=b\nprint'Fizz'*(i%(b/2+1)<1)+'Buzz'*(i%(~-b/3+4)<1)or d;"*5000

Hãy thử trực tuyến!

05AB1E , 39 37 36 byte

8+‚U5₄*LεX23S÷>Ö”FizzÒÖ”#×JDõQiyIв]»

-2 byte bằng cách tạo ra một cổng của @JonathanAllan Jelly câu trả lời 's .

Dùng thử trực tuyến hoặc xác minh tất cả các trường hợp thử nghiệm (nhưng là đầu ra danh sách và với 100 đầu tiên thay vì 5000).

Giải trình:

8+               # Add 8 to the (implicit) input
  ‚              # Pair it with the (implicit) input
   U             # Pop and store it in variable `X`
5₄*L             # Create a list in the range [1,5000]
    ε            # Map each value `y` to:
     X23S÷       #  Integer-divide the input by 2, and the input+8 by 3
          >      #  Increase both by 1
           Ö     #  Check for both if they divide value `y` evenly (1 if truthy; 0 if falsey)
     ”FizzÒÖ”    #  Push dictionary string "Fizz Buzz"
             #   #  Split on spaces
              ×  #  Repeat the strings the result amount of times (0 or 1)
               J #  Join both strings together to a single string
     DõQi        #  If this string is empty:
         yIв     #   Push value `y` in Base-input (as list) instead
    ]            # Close the if-statement and map
     »           # Join the list by new-lines (and inner lists by spaces implicitly)
                 # (and output the result implicitly)

Xem mẹo 05AB1E này của tôi (phần Làm thế nào để sử dụng từ điển? ) Để hiểu tại sao ”FizzÒÖ”là "Fizz Buzz".

Perl 6 , 91 byte

{$!=0;('Fizz'x++$!%%($_/2+|0+1)~'Buzz'x$!%%(($_+8)/3+|0+1)||[R,] $!.polymod($_ xx*))xx𐄦}

Hãy thử trực tuyến!

Khối mã ẩn danh trả về danh sách các chuỗi số Fizz/Buzz/FizzBuzzhoặc danh sách số nguyên bị đảo ngược trong cơ sở.

R , 138 byte

function(b,`*`=rep)Map(function(i)"if"((s=paste0("","Fizz"*!i%%(b%/%2+1),"Buzz"*!i%%((b+11)%/%3)))>0,s,i%/%b^((log(i,b)%/%1):0)%%b),1:5e3)

Hãy thử trực tuyến!

C # (Trình biên dịch tương tác Visual C #) , 180 171 byte

n=>{for(int i=1,p;i<5001;){p=i;var j=new Stack<int>();for(;p>0;p/=n)j.Push(p%n);var s=i%(n/2+1)<1?"Fizz":"";Print(i++%((n+8)/3+1)<1?s+"Buzz":s==""?string.Join("-",j):s);}}

Đầu ra như câu trả lời của Arnauld. Cảm ơn digEmAll cho ý tưởng sử dụng ngăn xếp để đảo ngược đầu ra.

Hãy thử trực tuyến!

05AB1E , 34 byte

Sử dụng cái nhìn sâu sắc toán học của Jonathan rằng ceil(n/3+3)=floor((n+8)//3)+1

ŽJćG8+‚2L>÷>NsÖ…™Ázz'ÒÖ‚×JNIв‚õKн,

Hãy thử trực tuyến!

Giải trình

ŽJćG                                # for N in [1 ...5001)
    8+‚2L>÷>                        # push [input//2+1, (input+8)//3+1]
            NsÖ                     # check each if N is divisible by it
               …™Ázz                # push "fizz"
                    'ÒÖ             # push "buzz"
                       ‚            # pair
                        ×           # repeat a number of times corresponding to the result of the 
                                    # divisibility test
                         J          # join to string
                          NIв‚      # pair with N converted to base <input>
                              õK    # remove empty string
                                н,  # print head of the remaining list