Дан массив Х(N). Записать в массив Y элементы массива Х, имеющие четные индексы — QBasic(Бейсик)

FOR i=0 TO N-1 STEP 2
  Y(i/2) = X(i)
NEXT i