QBasic массивы

[Sheva]

Выручайте пожалуйста...срочно надо..написать программу..
Дан массив X(N).Записать в массив Y элементы массива, имеющие четные ИНДЕКСЫ..
если не сложно то напишите пож начиная с (начало) и до (конец). Буду очень признателен!

[Sazary]

омг...

m = 0
for i=2 to N step 2
 m = m + 1
 Y(m) = X(i)
next i

Заполнение и вывод сами сделайте

[Sheva]

знал бы как сделал бы)))

[Sazary]

Сообщение от Sheva

знал бы как сделал бы)))

А задание тогда откуда? Раз есть задание, значит давали и материал..

dim n as integer
dim i as integer
input n
dim X(n) as integer
dim Y(n) as integer
for i=1 to n
 input X(i)
' дальше как написал выше

Во встроенной в qbasic справке есть все, что надо.