Hatena::Grouparaistudy

iwasekiの日記

2007-05-25

[]今更FizzBuzzをやってみた はてなブックマーク - 今更FizzBuzzをやってみた - iwasekiの日記

FizzBuzzやってみた。なんのことかわからない人は↓を見てください。

どうしてプログラマに・・・プログラムが書けないのか?

#!/usr/bin/perl

for my $a(1..100){
        if ($a % 3 == 0 && $a % 5 == 0){
                print "fizzbuzz\n";
        }elsif($a % 3 == 0){
                print "fizz\n";
        }elsif($a % 5 == 0){
                print "buzz\n";
        }else{
                print "$a\n";
        }
}

id:czk-htnさんが書いたのに比べるとかっこ悪い。更に$aのところを@aと書いてて、それに気がつかずに30分かかったわけで・・・。

・・・精進します。