Попарная замена элементов в массиве - VB
Формулировка задачи:
Не могу сделать задачу!!!Помогите ПОЖАЛУЙСТА!!!!!Нужно сформировать массив и выполнить попарную замену элементов в массиве.(Кол-во элементов в массиве должно быть четное)
Я сделала часть массива.Не знаю как сделать так,чтобы было именно четное кол-во элементов в массиве и как выполнить попарную замену.Например ( 6 7 8 9 1 3) ,замена (7 6 9 8 3 1 ) -нужно вот так сделать.
Решение задачи: «Попарная замена элементов в массиве»
textual
Листинг программы
Private Sub Command4_Click() Dim S As Integer N = Text1.Text : NAX K = InputBox("ВВедите К") if K<=0 or K>N then msgbox "AuAuAu": goto NAX S = 0 For I = K To N S = S + a(I) Next Text5.Text = S End Sub