Создайте и распечатайте в столбик одномерный массив длиной N следующим образом: А(1)= 6, А(2)= 8, А(3)= 10, А(4)= 12, … — PureBasic(Бейсик)

INPUT "N=", N
Dim A(1 to N)
For i = 1 to N
  A(i)=i*2 + 4
  Print "A("; i ; ") = "; A(i)
Next i