Function funkcija(ByVal prvi As Integer(), ByVal drugi As Integer()) As Integer()
Dim treci As Integer() = New Integer(3) {}
For i = 0 To prvi.GetUpperBound(0)
If prvi(i) = drugi(i) Then
Dim rezultat As Integer() = New Integer(3) {}
Dim prvi As Integer() = New Integer(3) {}
WriteLine("1. niz,{0} broj", i + 1)
Dim drugi As Integer() = New Integer(3) {}
WriteLine("2. niz,{0} broj", j + 1)
rezultat = funkcija(prvi, drugi)
For i = 0 To rezultat.GetUpperBound(0)