Пересечение и объединение массивов - Visual Basic .NET

Формулировка задачи:

У меня есть два проинициализированных челочисленных массива по 10 элементов. Мне нужно вывести их пересечение и объединение. Заранее спасибо!

Код к задаче: «Пересечение и объединение массивов - Visual Basic .NET»

textual
Dim mInts(n - 1) As Integer
Dim k As Integer
For i = 0 To n - 1
    For j = 0 To n - 1
        If ms1(i) = ms2(j) Then
            mInts(k) = ms1(i)
            k += 1
            Exit For
        End If
    Next
Next
ReDim Preserve mInts(k - 1)

13   голосов, оценка 4.308 из 5


СОХРАНИТЬ ССЫЛКУ