visual Basics vb.n

what are you using y

a. Positive numbera

b. Negative namber

c. even n

d. Individual

Dim pos = 0, neg = 0, X, I As Integer X = Console.ReadLine Do While x 99 1 t=1 If x >= 0 Then y += 1 Else z += 1 End If X = Console.ReadLine Loop