【案内】小説『エクストリームセンス』について

 小説『エクストリームセンス』は、本ブログを含めていくつか掲載していますが、PC、スマフォ、携帯のいずれでも読みやすいのは、「小説家になろう」サイトだと思います。縦書きのPDFをダウンロードすることもできます。

 小説『エクストリームセンス』のURLは、 http://ncode.syosetu.com/n7174bj/

2011年10月11日火曜日

ScalaでFizzBuzz

ScalaでFizzBuzzしてみました。
勉強中の言語なのでこんなもんかなぁ…

1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
// Scala - FizzBuzz
for ( i <1 to 100 ) {
    var Fizz = i % 3
    var Buzz = i % 5
    var Response = ""
    if ((Fizz == 0) && (Buzz != 0)) Response = "Fizz"
    if ((Fizz != 0) && (Buzz == 0)) Response = "Buzz"
    if ((Fizz == 0) && (Buzz == 0)) Response = "FizzBuzz" 
    if (Response == "") println(i) else println(Response)
    }

おまけ(VB.NET)…
1.
2.
3.
4.
5.
6.
7.
8.
9.
 '3の倍数と3の付く数でアホになる関数
    Private Function SanDeAho(ByVal Value As IntegerAs String
        Dim Response As String = Value
        Dim x3 As Integer = Value Mod 3
        If 0 <= Value.ToString.IndexOf("3") Or x3 = 0 Then
            Response = Value & "~ん!"    'アホを表現してます
        End If
        Return Response
    End Function

0 件のコメント:

コメントを投稿