【VB.NET】初心者でもわかる配列の初期化

Module ArrayInitializationExample
    Sub Main()
        ' 5つの整数を格納できる配列を作成
        Dim scores(4) As Integer

        ' 配列に値を代入
        scores(0) = 80
        scores(1) = 75
        scores(2) = 90
        scores(3) = 85
        scores(4) = 88

        ' 配列の内容を表示
        For i As Integer = 0 To 4
            Console.WriteLine($"得点 {i + 1}: {scores(i)}点")
        Next
    End Sub
End Module

Module ArrayWithInitialValuesExample
    Sub Main()
        ' 配列を作成し、同時に値を設定
        Dim fruits() As String = {"りんご", "バナナ", "オレンジ", "ぶどう", "メロン"}

        ' 配列の内容を表示
        For i As Integer = 0 To fruits.Length - 1
            Console.WriteLine($"果物 {i + 1}: {fruits(i)}")
        Next
    End Sub
End Module

Module DynamicArrayExample
    Sub Main()
        ' 動的配列の宣言
        Dim temperatures() As Double

        ' ユーザーから入力を受け取り、配列のサイズを設定
        Console.Write("何日分の気温を記録しますか？: ")
        Dim days As Integer = Integer.Parse(Console.ReadLine())

        ' 配列のサイズを設定
        ReDim temperatures(days - 1)

        ' 気温データを入力
        For i As Integer = 0 To days - 1
            Console.Write($"{i + 1}日目の気温: ")
            temperatures(i) = Double.Parse(Console.ReadLine())
        Next

        ' 平均気温を計算して表示
        Dim average As Double = temperatures.Average()
        Console.WriteLine($"平均気温: {average:F1}度")
    End Sub
End Module