Дан массив из 11 чисел. Найти количество эл-ов, равных 4, среди вторых элементов массива- QBasic(Бейсик)

CLS
DIM a(1 TO 11) AS SINGLE
DIM i AS INTEGER
FOR i=1 TO 11
PRINT "a(";i;")=";
INPUT a(i)
NEXT i
CLS
PRINT "Vtorie elementi massiva"
FOR i=2 TO 11 STEP 2
PRINT "a(";i;")=";a(i)
NEXT i
n=0
FOR i=2 TO 11 STEP 2
IF a(i)=4 THEN n=n+1
NEXT i
PRINT "Количество эл-ов, равных 4. n=";n