Dim A() As Integer = {2, 5, 7, 10, 12}Dim M As Integer = 3Dim L As Integer = 1
For i As Integer = 0 To A.Length - 1If A(i) Mod M = L ThenConsole.WriteLine(A(i))End IfNext i
Dim A() As Integer = {2, 5, 7, 10, 12}
Dim M As Integer = 3
Dim L As Integer = 1
For i As Integer = 0 To A.Length - 1
If A(i) Mod M = L Then
Console.WriteLine(A(i))
End If
Next i