Дан массив из 12 чисел увеличить на 3 единицы все числа, расположенные до первого числа, равного 10 — Basic(Бейсик)

DIM a(12)
FOR i = 1 TO 12
INPUT "vvedite element ", a(i)
NEXT
PRINT "massiv"
FOR i = 1 TO 12
PRINT a(i); " ";
NEXT
PRINT
FOR i = 1 TO 10
IF a(i) =10 THEN EXIT FOR ELSE a(i)=a(i)+3
NEXT
PRINT "novyy massiv"
FOR i = 1 TO 12
PRINT a(i); " ";
NEXT