#include<stdio.h>

main(){
    int i;
    int num = 100;

    for(i = 1; i <= 100; i++){
        if(i%3 == 0){
            printf("fizz");
        }
        if(i%5 == 0){
            printf("buzz");
        }
        if(i%3 != 0 && i%5 != 0){
            printf("%d", i);
        }
        printf("\n");        
    }

    return 0;
}

#include <stdio.h>

int main (void)
{
int i=0;

	for(i=1; i<=100; i++)
	{
		if(i%15 == 0)

		printf("FIZZBUZZ\n");

	 else if ((i%3)==0)

		printf("FIZZ\n");

	 else if ((i%5)==0)

		printf("BUZZ\n");

	 else 

		printf("%d\n", i);
	}
	return 0;
}

	

#include <stdio.h>
int main (void)
{
int x=0;
for(x=1; x<=100; x++)
{
if(x%15 == 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 (void)
{
int i=0;

	for(i=1; i<=100; i++)
	{
		if(i%15 == 0)

		printf("FIZZBUZZ\n");

	 else if ((i%3)==0)

		printf("FIZZ\n");

	 else if ((i%5)==0)

		printf("BUZZ\n");

	 else 

		printf("%d\n", i);
	}
	return 0;
}

import Data.List

main :: IO ()
main = mapM_ putStrLn $ take 100 fizzbuzz

fizzbuzz :: [String]
fizzbuzz = zipWith3 (\n fizz buzz ->
                     if null (fizz++buzz) then show (n::Int) else fizz++buzz)
             [1..] (cycle ["","","Fizz"]) (cycle ["","","","","Buzz"])

import Data.List
fizzBuzzList :: Int -> [String]
fizzBuzzList n = zipWith3(\i f b -> if f++b == "" then show i else f++b)
    [1..n] (cycle ["","","Fizz"]) (cycle [ "", "", "", "", "Buzz"])

main :: IO()
main = mapM_ putStrLn $ fizzBuzzList 100

<?php
for ($i = 1; $i <= 100; $i++)
{
	$output = '';

	if ($i % 3 == 0)
	{
		$output .= 'Fizz';
	}

	if ($i % 5 == 0)
	{
		$output .= 'Buzz';
	}

	if (!$output)
	{
		$output = $i;
	}

	echo $output . "\n";
}
?>

<?php
function fizzbuzz($fizz = 3, $buzz = 5, $total = 100, $echo = true){
    $output = '';
    for($i = 1; $i <= $total; $i++) {
        $output .= ($i % $fizz == 0 && $i % $buzz == 0 ? "FizzBuzz\n" : ($i % $fizz == 0 ? "Fizz\n" : ($i % $buzz == 0 ? "Buzz\n" : ($echo ? $i."\n" : ''))));
    }
    return $output;
}

echo fizzbuzz();
?>

my $text;
for (1..100){
    $text .= 'Fizz' unless $_%3;
    $text .= 'Buzz' unless $_%5;
    $text? print $text : print $_;
    print "\n";
    $text = '';
}

my $a = 1;

while($a < 101 ) {
        
        if($a % 15 == 0) {
                print("fizzbuzz" . "\n" );
        } elsif($a % 3 == 0) {
                print("fizz"."\n");
        }elsif($a % 5 == 0){
                print("buzz". "\n" );
        }else{
                 print ($a . "\n" );
        }
        $a = $a +1;

}

for n in xrange(1,101):

    if n % 5 ==0 and n % 3 == 0:
        print "Fizzbuzz"
    elif n % 3 == 0:
        print "Fizz"
    elif n % 5 == 0:
        print "Buzz"
    else:
        print n

for i in range(1,101):
    if i % 3 == 0 and i % 5 == 0:
        print('fizzbuzz')
    elif i % 3 == 0:
        print('fizz')
    elif i % 5 == 0:
        print('buzz')
    else:
        print(i)

def fizz_buzz(numbers)
    
    numbers.each do |number|
       response = ""
       response += "Fizz" if number % 3 == 0
       response += "Buzz" if number % 5 == 0
       puts response.empty? ? number : response
    end
end

numbers = (1..100).to_a
fizz_buzz(numbers)

 def fizz_buzz(numbers)
    numbers.each do |number|
        div_by_3 = number % 3 == 0
        div_by_5 = number % 5 == 0

        if div_by_3 && div_by_5
            puts "FizzBuzz"
        elsif div_by_3 
                puts "Fizz"
            elsif div_by_5
                    puts "Buzz"
                else
                    puts number
            end
        end
end

numbers = (1..100).to_a
fizz_buzz(numbers)