レポート1 レベル1 100までの3の倍数を表示

Visual Basic

Module Module1

    Sub Main()
        Dim i As Integer

        Console.WriteLine("レベル1-1")
        For i = 1 To 100
            If i Mod 3 = 0 Then
                Console.Write(i)
                Console.Write(" ")
            End If
        Next
        Console.WriteLine()
        Console.WriteLine()

        Console.WriteLine("レベル1-2")
        For i = 3 To 100 Step 3
            Console.Write(i)
            Console.Write(" ")
        Next
        Console.WriteLine()
        Console.WriteLine()

      ' コンソールウィンドウが閉じないようにする
      Console.WriteLine("Enterキーを押すと終わります")
      Console.ReadLine()
  End Sub

End Module