Задача. Организовать массив из 12 элементов, если элементы с четным индексом равны 1, с нечетным равны 2. Найти произведение элементов.
*Примечание:при этом допустимо использовать операторы: DIM(одномерный, двумерный),LET, READ-DATA, WHILE, FOR-TO-STEP-NEXT, GO TO, IF-THEN-ELSE, INPUT-PRINT.
Решение.
Dim x(12)
For i = 1 to 12
P = 1
x(i * 2) = 1
x((i * 2) +1) = 2
...
И тут возникает несколько вопросов. Что писать дальше? Правильно ли составлена программа на данном этапе? Спасибо.
С ув. FirsT.

Dim x(12)
P = 1
For i = 1 to 6
x(i * 2) = 1
x((i * 2)-1) = 2
P=P*x(i*2)
P=P*x(i*2-1)
Next
Print P

Как-то так...
Все исправления понятны?