Найти количество нулевых элементов массива R(15) , сформированного с помощью команды RND. распечатать номера нулевых элементов- QBasic(Бейсик)

' Zavodim tselochislennii massiv
DIM R(15) AS INTEGER
' Zapolnyaem yego
FOR i = 1 TO 15
    R(i) = (RND * 5) - 2
NEXT: CLS
' Pechataem nulevie znacheniya
FOR i = 1 TO 15
    IF R(i) = 0 THEN PRINT i
NEXT