Написать программу: найти минимальный среди положительных элементов массива. интервал: от -20 до 150

Пишу на QBasic
массив создан и заполнен
PRINT "Введите количество элементов массива"
INPUT N
MIN= 150
FOR I = 1 TO N
IF I  <MIN AND I>0 THEN
MIN = I
END IF
NEXT I 
PRINT MIN