Дан массив из 20 элементов. Найти минимальный среди элементов , номер которого кратен трем — QBasic(Бейсик)

DIM a(20)
FOR i = 1 TO 20
    INPUT "vvedite element "; a(i)
NEXT
PRINT "massiv"
FOR i = 1 TO 20
    PRINT a(i); " ";
NEXT
PRINT
min = a(3)
nom = 3
FOR i = 1 TO 20
    IF (i MOD 3 = 0) AND (a(i) < min) THEN min = a(i): nom = i
NEXT
PRINT "min s nomerom kratnym 3="; min; " ego nomer="; nom