#include <stdio.h>
int main(){
    int x = 1;
    for(x = 1; x < 101; x++){
        if(x %3 ==0 && x%5 == 0){
            printf("FizzBuzz\n");
        }
        else if(x %3 ==0){
            printf("Fizz\n");
        }
        else if(x%5 == 0){
            printf("Buzz\n");
        }
        else{
            printf("%d\n",x);
        }
    }
    return 0;
}

#include <stdio.h>
int main(){
    int x = 1;
    for(x = 1; x < 101; x++){
        if(x %3 ==0 && x%5 == 0){
            printf("FizzBuzz\n");
        }
        else if(x %3 ==0){
            printf("Fizz\n");
        }
        else if(x%5 == 0){
            printf("Buzz\n");
        }
        else{
            printf("%d\n",x);
        }
    }
    return 0;
}

#include <iostream>
using namespace std;
int main( ) {
    bool fizz, buzz;
    for( int x = 1; x <= 100; x++ ) {
        if( fizz = x % 3 == 0 )
            cout << "Fizz";
        if( buzz = x % 5 == 0 )
            cout << "Buzz";
        if( !(fizz || buzz) )
            cout << x;
        cout << endl;
    }
}

#include <stdio.h>
#include<iostream>
using namespace std;

int main()
{
    for (int i=1;i<=100;++i)
    {
        string str = "";
        if(i%3==0)
        {
          str = "Fizz" ;
        }
        if(i%5==0)
        {
            str = str + "Buzz";
        }
        if (str != "")
        {
            cout << str;
         }
        else 
        {
            cout<<i ;
        }
        cout << endl;
        
    }
}

import std.stdio;

void main() {
    for (int i = 1; i <= 100; i++) {
        if (i % 3 == 0) writef("Fizz");
        if (i % 5 == 0) writef("Buzz");
        else if(i % 3 != 0) writef("%d", i);
        writef("\n");
    }
}

import std.stdio;

void main() {
    for (int i = 1; i <= 100; i++) {
        if (i % 3 == 0) writef("Fizz");
        if (i % 5 == 0) writef("Buzz");
        if (i % 3 != 0 && i % 5 != 0) writef("%d", i);
        writef("\n");
    }
}

main = mapM_ putStrLn fb

fb = [max(show x)$[n|(f,n)<-[(3,"Fizz"),(5,"Buzz")],mod x f<1]>>=id|x<-[1..100]]

main = mapM_ putStrLn fb

fb = [max(show x)$[n|(f,n)<-[(3,"Fizz"),(5,"Buzz")],mod x f<1]>>=id|x<-[1..100]]
-- Old:
--   [max(show x)(concat[n|(f,n)<-[(3,"Fizz"),(5,"Buzz")],mod x f==0])|x<-[1..100]]

for i=1,1e2 do print(i%3<1 and(i%5<1 and'FizzBuzz'or'Fizz')or i%5<1 and'Buzz'or i)end

for i=1,1e2 do print(i%3<1 and(i%5<1 and'FizzBuzz'or'Fizz')or i%5<1 and'Buzz'or i)end

let rec prn_fn i max = 
  if i mod 15 = 0 then prerr_endline "FizzBuzz"
  else if i mod 3 = 0 then prerr_endline "Fizz"
  else if i mod 5 = 0 then prerr_endline "Buzz"
  else prerr_endline (string_of_int i);
  if i >= max then ()
  else prn_fn (i + 1) max
in
  prn_fn 1 100;;

<?php
for ($i = 0; $i++ < 100;  print( ( ( $i % 15 == 0 )? "FizzBuzz" : ( ( $i % 3 == 0 )? "Fizz" : ( ( $i % 5 == 0  ) ? "Buzz" : "$i" ) ) ) ) , print("\n") );

<?php

for ($i = 0; $i++ < 100;  print( ( ( $i % 15 == 0 )? "FizzBuzz" : ( ( $i % 3 == 0 )? "Fizz" : ( ( $i % 5 == 0  ) ? "Buzz" : "$i" ) ) ) ) , print("\n") );

print+(Fizz)[$_%3].(Buzz)[$_%5]||$_,$/for 1..100

print+(Fizz)[$_%3].(Buzz)[$_%5]||$_,$/for 1..100

from math import *
def FF(): # FizzBuzz programming puzzle
        incMod3 = [1, 2, 0]             # x = (x + 1)%3 division is evil
        incMod5 = [1, 2, 3, 4, 0]       # x = (x + 1)%5 division is evil
        fizz = 0
        buzz = 0
        for i in range(1, 101):
                fizz = incMod3[fizz]
                buzz = incMod5[buzz]
                if fizz + buzz == 0: print("FizzBuzz")
                elif buzz == 0: print("Buzz")
                elif fizz == 0: print("Fizz")
                else: print(i)
FF()

for i in range(1,101):
 print [0,'Fizz','Buzz','FizzBuzz'][(i%3<1)+2*(i%5<1)] or i

(1..100).each{|n|
    if n % 15 == 0
        puts "Fizzbuzz"
    elsif n % 5 == 0
        puts "Buzz"
    elsif n % 3 == 0
        puts "Fizz"
    else
        puts n
    end
}

for i in 1..100
                          if i%15==0
                            puts "FizzBuzz"
                          elsif  i%3==0
                            puts "Fizz"
                          elsif i%5==0
                            puts "Buzz"
                          else
                            puts i
                          end
                        end

(do ((i 1 (+ i 1)))
    ((> i 100))
    (display
      (cond ((= 0 (modulo i 15)) "FizzBuzz")
            ((= 0 (modulo i 3))  "Fizz")
            ((= 0 (modulo i 5))  "Buzz")
            (else                i)))
    (newline))

(do ((i 1 (+ i 1)))
    ((> i 100))
    (display
      (cond ((= 0 (modulo i 15)) "FizzBuzz")
            ((= 0 (modulo i 3))  "Fizz")
            ((= 0 (modulo i 5))  "Buzz")
            (else                i)))
    (newline))