Fizz Buzz問題というのを見て

まぁ試したわけです。

あまり文句を言っても切ないだけなので、概要だけ。

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

必要なのはこの部分。

1から100までの数をプリントするプログラムを書け。ただし3の倍数のときは数の代わりに｢Fizz｣と、5の倍数のときは｢Buzz｣とプリントし、3と5両方の倍数の場合には｢FizzBuzz｣とプリントすること。

これができない自称プログラマがいるとの記事です。

プログラマーでなくても全体の流れは分かりますよね。
１から１００まで順に増やしていって、３で割ってあまりが０ならFizz、５で割ってあまりが０ならBuzz
３も５もどちらも真ならばFizz Buzz、どちらにも属さなければ数字をそのまま表示すれば良いわけですよ。

上の文章を素直にコーディングすれば、まぁこんな感じ？

    For i = 1 To 100
        If (i Mod 3 = 0) And (i Mod 5 = 0) Then
            System.Console.WriteLine("Fizz Buzz")
        ElseIf (i Mod 3 = 0) Then
            System.Console.WriteLine("Fizz")
        ElseIf (i Mod 5 = 0) Then
            System.Console.WriteLine("Buzz")
        Else
            System.Console.WriteLine(i.ToString)
        End If
    Next

はい、VBプギャーm9ですねｗ

でも、これさえもができない自称"プログラムできます"な方が大学を出ていると思うと…
まぁこれ以上文句を言うのもやめる。この記事の信憑性の確認もできないしね。

まぁ、あれだ。このコードのコーディング時間より、ブログを書く時間のほうが長いのは秘密だ！！ｗ

追記：どことなく思いついた。
FizzBuzzのときにFizzBazzをまとめた文字列として書く必要のないことに気がついた。
今度はRUBY

(1..100).each{|i|
	print "Fizz" if i%3 == 0
	print "Buzz" if i%5 == 0
	print "#{i}" if (i%3)*(i%5) != 0 
	puts
}

FizzBuzzのときはどちらにも当てはまる場合と考えれば、両方を改行せずに出してやればいいわけで。
んで、どちらにも当てはまらない場合のみ、即ち３と５それぞれの剰余の積が０でなかった場合に数字を出すわけですね。（ここちょっと気持ちいいｗ）

これくらいなら思いつく人はたくさんいるんだろうけれど。
もっとスマートにできるかなー