В массиве содержится 10 случайных чисел. Выведите на экран все четные числа и отдельно нечетными числами

Visual basic 6.0

Let array = [1, 2, 8, 4, 12, 35, 2, 5, 6, 21];

let odd = [Int];

let even = [Int];

for (number in array) {

if ((number mod 2) = = 0) {

odd. append (number) ;

} else {

even. append (number) ;

}

}

println ('Четные числа: / (odd) ') ;

println ('Нечетные числа: / (even) ') ;