Сформулировать массив B(), состоящий из четных чисел массива A()

Question

Сформулировать массив B(), состоящий из четных чисел массива A()

Comments

и что значит "четные числа"? "Элементы массива, значение которых чётное" ИЛИ "Элементы массива, которых стоят на чётных местах в массиве"?

---

Не могу не подключиться))"Сформулировать"?

---

:)

Answer 1

Visual Basic .NET :)

Imports System.Console

Module Module1
    Sub Main()
        Dim Rnd As Random = New Random()
        Dim A(5), B(5) As Integer
        Dim k As Integer
        Dim i As Byte

        For i = 0 To A.Length - 1
            A(i) = Rnd.Next()
            WriteLine("A({0}) => {1}", i, A(i))
        Next

        WriteLine()

        i = 0
        For Each k In A
            If (k Mod 2 = 0) Then
                B(i) = k
                i = i + 1
            End If
        Next

        For k = 0 To i - 1
            WriteLine("B({0}) => {1}", k, B(k))
        Next

        ReadKey(False)
    End Sub
End Module