Составить программу которая напечатает в обратном порядке все положительные элементы — Basic(Бейсик)

INPUT "vvedite kol-vo elementov ",n
DIM a(n)
RANDOMIZE TIMER
FOR i=1 TO n 
a(i)=INT(RND*20)-10
NEXT
PRINT"massiv"
FOR i=1 TO n 
PRINT a(i);
NEXT
PRINT
PRINT "resultat"
FOR i= n TO 1 step-1
IF a(i)>0 THEN PRINT a(i);
NEXT