Дано целое число N (> 0). Сформировать и вывести целочисленный массив размера N, содержащий N первых положительных нечетных чисел: 1, 3, 5, … .- QBasic(Бейсик)

CLS
Again: INPUT "Vvedite n : ", n
          IF n > 0 THEN  ELSE GOTO Again
  '  Формируем и заполняем целочисленный массив
DIM A(n) AS INTEGER
FOR i = 1 TO n
  A(i) = i + i - 1
NEXT i
  '  Вывод
FOR i = 1 TO n
  PRINT A(i);
NEXT i