awkで書いたFizzBuzz

説明

awkで書いたFizzBuzzです。これはAnarchy Golf向けに作ったものですが、ルールを完全に勘違いしていて、最速のものを作るんじゃなくてもっとも短いコードを競うものだったんですね。なのでこれは速いですがスコアは低いです。でもどうすりゃ57バイトで書けるんだ？

とりあえず71バイトで書いてみた。20110324

実行例

mbp13:~ takesita$ chmod +x fizzbuzz.awk
mbp13:~ takesita$ ./fizzbuzz.awk
1
2
Fizz
4
Buzz
Fizz
7
8
Fizz
Buzz
11
Fizz
13
14
FizzBuzz
16
17
Fizz
19
Buzz
Fizz
22
.
.
.
89
FizzBuzz
91
92
Fizz
94
Buzz
Fizz
97
98
Fizz
Buzz
mbp13:~ takesita$

ソースコード

#! /usr/bin/awk -f
BEGIN{
  for (i=1; i<=100; i++)
    if (!(i%3))
      if (!(i%5)) print "FizzBuzz";
      else print "Fizz";
    else
      if (!(i%5)) print "Buzz";
      else print i;
    exit;
}

一行野郎で書いてみた　20110324

BEGIN{F="Fizz";B="Buzz";while(i<100){i++;print i%5?i%3?i:F:i%3?B:F B}}